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PARTI 

Your Spectrum, 
Your Hero 




CHAPTER 1 
Origins 



Switch the light on, quick ! There, that's better, now we can see a little fur- 
ther ahead into the gloom. The strange noises went away when the light 
went on, and now all is quiet . Ahead, an opening in the cave wall - let's go 
through and see what lies ahead for us. 
Aha! What's this? A Black Rod lying on the damp floor of the cave. Go 




little blighter. Bui it flies away — something is frightening it. Well, the 
Black Rod looksa bil menacing, so lei's drop it . That's better, the Bird has 
seilled again, and is merrily singing, oblivious lo us creeping towards it 
with our Cage. The bird is caught! 

On again, pausing lo pick up ihe Rod (no doubt it will come in handy 
laier), lo the next cave, with Lamp held high before us. Suddenly a vast 

with iis eye and sways before us. There is no other exit apparent, so we must 
get past this beast in order to progress on our quesl. Let 's stop and think for 

Waving ihe Rod might work this time — but no, the Snake isn't worried 
by thai! How about using ihe Rod as a polevault? The Snake is too big to 
vault over. The little Bird is still singing away merrily — now, wait a 
moment here, maybe wecan feed ihe Bird to ihe Snake. After all, the Snake 
is probably hungry, and this might keep it busy long enough for us lo rush 
past and away. So let's free Ihe bird and see whai happens. Now would you 
believe it? The Snake, frightened by ihe fluttering of wings, hisses violently 
and slithers away into the blackness, leaving us free to continue our quest. 

This is a typical scenario from a computer-assisted adventure, in which 
overt violence does not play a large pan, but there are variations in which 
yourvAorcurm and fichtinc abilities take preectleiiie dvlt ytxir rearming 
powers. We'll look at some of these variations later, but for now, let's 
examine what we mean by adventure. 




Society in the United States, began a vast campaign, and expanded the 
original rules to offer a complete environment for the players. These rules 
evolved, with the help of Gary Gygax, into one of the most successful 
games of the century — Dungeons & Dragons, published by Tactical Stu- 
dies Kulcv Diinm-im.-. <l Dwts, from TSR. pic^nf, the player wiih a 
highly stylised system of play, where nothing is left to chance, but 
everything played according to tables. It became extremely popular, and is 

headed by the traditionalist, moving his armies of miniature lead soldiers 
about his tabletop, measuring explosion effects with a steel rule, and the 

tenting anything from individual soldiers, planes or ships, through batta- 

played on a board, marked across by hexagons to facilitate movement, and 
various representations of landscapes. The box games range from indi- 
vidual combat to global warfare, and from utter simplicity to staggering 
complexity, needing several days (or weeks?) to play. 

However, Gygax and Arneson, in the early 1970s, forged a path of their 
own through the uncharted world of fantasy war-gaming and created a 
unique system of playing, with their game of Dungeons & Dragons. 
Although the name is jealously guarded by TSR, the holders of the 
copyright, D&D is often used as a generic term for this type of combat 
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A complex of, originally, Dungeon; 
anything from a spaceship to post-nucl 
play starts by the Dungeon-Master. Th 
explore his creation. It's possible for jus 
but a party of two or more players is pi 
off each other, thus making for a morf 

Each player controls a character, o 



attempts to recreate, in the smallest detail, a particular battle, or series of 
battles — and, if possible, to UM.-iiu.-ii iu.-iu.-i al.. In p 10 change the course of 
history. The RPG-er, as you will now be aware, creates his own world. 
Thus there are really no precedents, and each adventure is unique. 
The DM, whilst taking no active pan in the proceedings, nevertheless 

dungeon complex, but he also populates the network with many monsters 
and traps Tor the unwary, as well as seeding the dungeons with plenty of 

Another major difference is the idea of puzzles inherent in the Role 
Playing Game — it is not enough to simply live a fantasy life by proxy. The 
player will, along with his colleagues, have to solve conundrums at every 
step, as well as fighting all the monsters along the way. 

The combat system used when characters meet monsters and other nice 
people is complex, and much use is made of dice. Some, having more than 
the usual six sides, are called percentile dice, and give a degree of probabil- 
ity to the luck of the throw. 

Along with all these differences, there is another, in that characters may 

and you can see that this whole branch of war-gaming has departed quite a 
long way from our original tabletop game with lead soldiers. 

We've spent a long time discussing RPG's, and indeed several complete 
books have been written on the subject. The whole game system has one 
major flaw — at least from the point of view of a crofter in the highlands of 



A tier [he success of Dungeons & Dragons, it was only natural lhat many 
imitators sprang up, some making more impact on the scene than others. 
Probably ihe most enduring of these has been Ken Andre's game Tun- 



ing in hard-earned levels from the lowly 'knock -knock' (which opens 
locked doors) and 'take that you fiend' (which uses 1Q as a weapon), 
through such quaintly-named spells as 'Zombie Zonk' and 'Mutatum 
Mutandorum' to the ultimate, 'Born Again', which pretty well speaks for 
itself. 

However, the main development of T& T, which has endeared it to many 
thousands of fantas> y.imL'- players throughout the world, and which 
makes it particularly interesting to us computer users, is the unique system 
of solo dungeons which has taken 7"<57"as its game system. 

These dungeons take the form of illustrated books, each containing a 
ready-made adventure which can be played, according to the T& T rules, by 
one person. Really a series of multiple-choice actions, in which the text acts 
as Dungeon Master the books are a boon to the player who is unable to get 



receiving information about his surroundings — but this time from the 
computer. A tireless referee and Dungeon Master, the computer is the ideal 

Other games came along in the wake of Adventures, probably the most 
successful being Zork, which is the forerunner of many of the adventure 
games implemented for the home micros of the late 1970s. The PET, Apple 
and Tandy machines were well-served with these for several years, while 
the original was passed, in disk form, around the circle of computer 
professionals. This free market was, how 



The obvious drawback for the home enthusiast, is that in its original 
form. Adventures can only be run on a mainframe computer, costing a 
couple of hundred thousand pounds — not the usual living-room furni- 

With the advent of the cheap microcomputer, programs of the adven- 
ture genre came within reach of the home user. Now solo play became poss- 
ible to the enthusiast not lucky enough to possess an IBM mainframe. 



CHAPTER 2 

The First Software 




Adventure program. 

Back in the pre-historic era of micro computing, about five or six years 
ago, three machines dominated the scene. All were American, and all were 
very expensive — and, incidentally, still are. All h;id Implementations of 
Adventures and Zork written for them. The Apple I, the Commodore Pet, 
and the TRS-80 are still with us, in one form or another, but the cost of 

And then along came Sir Clive Sinclair. After single-handedly transfor- 
ming !he digital watch market with the Black Watch, and the pocket calcu- 
lator market wilh the Executive (though only by virtue of their low cost and 
attractive styling, not long-term reliability), it seems, in hindsight, only 
inevitable that he should go on lo concentrate on the computer market. 

wftware was practically non-existent. Itwas not until the launch of the 

home micro computer sales took off, and with thai Ilic creation of worth- 
while software. Inci demnlly. this seems to he the exception that proves the 
rule that software helps sell hardware! 

Adventure programs for the ZX8 1 are abundant and take several forms 
— some are purely text, while others are graphic in nature, with every 




Crowther/Woods original and Zork, but several other popular programs 
were written in the States, in the mid-1970s. As programmers became more 
efficient on their new toys, the ZX machines, so these older programs were 
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he player or the monster is finally 
i, the battles become harder, 
available, Caiacombs is a very good introduction for the 
ZX81-owner, to this kind of adventuring. 

Another, rather novel, approach lo graphic adventuring is seen in 
Foilkade's Fantastic Voyage. Based on [he science- fiction novel of the 
same name, the action takes place in, of all places, the human body. 
The book (and film of the same name), concerns the exploits of a team of 

operate on their patient — from within. 



vessels is ditticnli indeed to neonate. Occasional^' while corpuscles have 
to be shot at, arcade-style. 

This is not strictly, 1 suppose, an adventure, bin still it possesses the same 
kind of game mechanics as many more traditional programs in its search 
for the ultimate — in this case, the blood clot in the brain that has to be 



watching, or any mono record is not good music. No, the classic programs 
will remain so, even in silent monochrome, and Ihe lack of sound and 
colour may be, albeit rarely, a virtue. 

The arrival of the Speclrum has bought a veritable flood of software, 
95<7o of it games-orientated. A sizeable portion of this is adventure in one 
form or another. 

Artie Computing have stuck with the same adventures that were written 
for the ZX81 , merely transcribing them, complete with black text on white 



colourful. 
The game, like, 
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Dungeon Adventure will accept TAKE, so now we are the proud possess- 
something else. 

The packing case, if you remember, was lying with one end open, so it 



So let's type in EXAMINE CASE a: 



treasure in order to g 
in order to gain this i 
spoil your fun at sue 



writing, so (his is a voyage of discovery for all of us 

We are now on an east-west road south of the river across which run: 
bridge. A pipiiiiiin.ri.-'i head is carved into the cliff north of the rivet 
t.irir.ue forming the bridge. A ruined tower stands on top of the cliff. E 
are EAST, WEST and SOUTH. This is the standard formula for 
adventures — enter a location and a brief description is given, with a li 
possible exits. Act uallv. i he descriptions ol" I lie \ arums local ion wire ra 



tothing to be seen lying! 



a flat yrassv plain, stretching as far as the eye can see. 

This is one of those phrases that you will come to treat with respect. Tt 
usually means that if you once set fool in the location to which it refers, you 
will be lost forevermore — or at least until you give up in sheer despair! 

So we will give that grassy plain a miss for the moment. However, we can 
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island — how charming! So let's type GO NORTH. : 

■ . ■ .: ■<"■■!■ I I 

sings her siren song - 



our steps hack to ilic cast v.eM road . just south of the bridge. This 
t. We type GO EAST, and the computer duly 
;r east along the road, north of a steep, treeless 



This treeless hill seems to be worth investigating — going south, v 
to the side of the steep hill. which rises into I he clouds. Rumblings e 
from above! We can go UP here, so let's do so. We are now in a ( 
distorted monoliths, etched into grotesque figures by the acid rain 
ning arcs overhead, revealing the stark horror of this haunted plac 

instruct the computer to LOOK around, a host of fierce flames wil 
forth: they are Rakshasa! Their leader floats forward and challeng 
a game — if you win the throw of the dice he'll make our spiritual ; 
greater in some way. Of course, we may lose. . . 

We have to play, and after all, it sounds quite a bargain, dot 
Unfortunately, we need a way of loading the dice (these Raksh 
pretty cunning), and we haven't found it yet , although I might say 1 
to be found somewhere in this opening sequence. 

As you may expect, we lose this particular game, and once agi 
ourselves, after being asked if we want to play again, back on the m 
— we're learning each time, though, aren't we? 

Let's get back to that stretch of the road just north of the steep hi 
we recently met the Rakshasa. We won't go back there again until 



We can work our way back along the road, past the steep bill, and (li 
bridge, back to those stepping-stones. As we have a poppy seed with u 
now, we might be able to use it 10 fight that siren. At the stepping-stones 
we type GO NORTH, which gets us onto the stones. Last time we wer 
here, we got unceremoniously dumped in the water when we tried t< 
proceed further north past the siren, so let's be a little cautious this time 




CHAPTER 3 
The Hobbit 



The Sinclair Spectrum, with its colour and (very basic!) sound, understan- 
dably has had an awful amount of arcade, zap'em, software written for it. 
Without wishing lo enter into a discussion of Ihe siale of play inlhe micro- 
computer world, it is nevertheless obvious that the vast majority of micro- 
users concentrate on reaction games — and why not? 

After our short analysis, at the sian of the last chapter, on the two styles, 
lext and graphic, of adventure programs, let's turn now to the graphic. 

And within this category itself, we find two distinct sub-categories. 

The first is best represented, at the lime of writing, by The Hobbit, by 
Melbourne House. 

The Hobbil is probably the best known, at least by reputation if not 
personal experience, of the adventures available for the Spectrum. Already 
a classic, ii is still the most talked-about and puzzled over. In the true tradi- 

improve upon The Hobbil, but none can now usurp its place as the first 
truly great adventure for the Spectrum. 

The Hobbil, by J R R Tolkien, is, if you like, the preface to the 
monumental Lord of the Rings, probably the richest source of material for 
the adventure writer. This vast work, with its three volumes of absolutely 
riveting story, and supporting historical documentation in The Silma- 
rillion (together with encyclopaedic information from authors such as 
Tony Tyler, with his Tolkien Companion), is an absolute goldmine of 
ideas. Melbourne House pulled off a fabulous coup in acquiring the rights 
to use The Hobbil from the Tolkien estate, and has produced a program 
which lives up to the novel. The Lord of Ihe Rings is an obvious sequel to 
The Hobbil, and is the one that everyone is, of course, waiting for. No 
news is presently available on the subject. 

written — a text adventure in the good old style, supported by graphics. 
Melbourne House has taken many scenes from the book, and illustrated 
them with beautiful high -resolution pictures, using an impression of the 
pictures, drawn by Tolkien himself, supporting the text in the original 
book. This was a logical progression from the earlier programs from other 
writers which featured block graphics. The Other important details that set 
The Hobbil apart from previous text/graphics adventures is what Mel- 



course, guarding the gold which you have battled through many danger's to 
retrieve from his clutches. When you arrive, you want to draw your sword, 
fight the dragon, and then collect the gold. Most programs would require 
you to type in several commands before the final objective was achieved. 
So you might well have to type: "DRAW SWORD", "KILL DRAGON" 
then finally (and it you were ■.ueeessluli ), "(,!■. I (,OI D". 

llieHohhn im»r„r, "ill n v vepl onti m:i rid- mkIi av "DRAW SWORD 
AND KILL DRAGON, THEN GET GOLD AND LEAVE", thus saving 
finger stress, but also having a more natural feel. 

The adventure may be solved in many ways. Unlike the traditional pro- 
grams, in which there is only one solution to the complete puzzle The 
Hobbit may be completed by any one of several methods. A percentage 
SCORE is given throughout the game, and people have finished ihc ■idven 
ture with scores as low as 42%, and as high as 2 10% 1 The aim remains the 
same, however, to rescue the gold from Smaug, the dragon and return to 
the comfort of your own home under the hill at Baa-End. 



Oandalf (surely you wouldn't be tempted to do that, would you?) and he 
may well turn up alive and well at some later date (and may also be carrying 
your front door). These arc little quirks that Hobbit-ists have become 
sp^tteT^ ! °' 80(1 " n ^ thefe U almOSl 3 f3n C ' Ub ° f H ° bbil bug 
So The Hobbit, whilst being, on the surface, a traditional adventure 
nevertheless plays m a unique way. The puzzles set by programs in the 
classic style (programs like Level 9's) have one solution (usually') which 
remains the same. Once you have completed the adventure, that's it. Of 



course, the puzzles may take months to solve, and several programs have 
beaten track of the game, which play no part in the solution, but which 




There has been, and there will, 1 hope, still be in the future, lengthy 
discussion on The Hobbit. If you have wondered whether lo buy this most 
charming, frustrating, annoying, beautiful program, rest assured that you 
will enjoy many hours of good adventuring! 




CHAPTER 4 
Graphic Adventures 



We can determine two rather obvious categories of graphic adventure. 
The first is descended from Wumpus, a game we have met before, whose 
popularity can be ascribed in large part to David Ahl of Creative Comput- 



a program of 



ariety of graphic program often relie: 



e might expect from a version of Wut 



While the set -up procedure is going on, the computer counts down with the 

not hung-up on you. 

After this initial set-up, the player is asked to choose which character he 
wants to play from a list of options. He may be: 
• dwarf 
an elf 



But depending on what the answer is to the charactet 
given out to the player in three important departments. Tr 
chooses to be a hobbit, he is given 26 points, in the follov 
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an elf as his alter ego, the points ai 



t, has a lot of strength, and quite i 
ng the good old D&D tradition, he has, unfairly, i 



wever the player decides, he is then gtvt 
i (and if you press a wrong key, the con 
: the fighter will find the computer snet 



MACE 0 FLARE + 0 GOLD PIECES 
HERE YOU FIND THE ENTRANCE 
WHAT DO YOU V 



nil wnh our .imiinilu- dkl ribul ai thus: 



e purchased from the armoury: 



YOU ARE NOW ENTERING THE CASTLE 
YOU ARE IN ROOM 1 -4 ON LEVEL 1 
YOU HAVE;- STRENGTH 15 




YOU OPEN THE CHEST; 
IT EXPLODES! 



but, unfortunately, si 



Imaril is a jewel created by Fcanor, an elf of Middle Earth, 
there were three of them, so maybe the oiher [wo are to be found 
wiihin Muncep's Castle. The jewels are very powerful, so it 
h gelling them. We'll go south 10 get this one. 
id the compurer lells us that: 

V HAVE THE SILMARIL 




Oh dear, (or words to that effect)! The only way that the Bear will alio' 
us to escape, is if we give him (he Silmaril. And we've only had it five mil 
tito ! Kb, well. Let him have what he wants, wc may well find the other tw 
SilmarsUoon. mt t-.;;;:;\: Jn:tht-.. we tan tarry on null onrmiM 
lamp held high before us. 



e east, we can see a Crystal Orb. That sounds as if u should b 
interesting. Moving in Room 1-4, we only find the Crystal Orb. Taking: 
peek at the Help menu, we can see that the command to use is: 

(G)aze into the Orb 

The Orb tells us that it sees us being killed by a Wolf! Obviously we hav, 
to slay out of the way of Wolves for a while. 

From here, we can see, to the south, stairs going down. To the east, w. 
see — yup, a Wolf. So south has to do for the moment. Actually, when yoi 
enter a room with stairs, you have a choice of going down, or up, or jus 
passing through. We'll pass through this lime, as we are having quite goc« 
fun on this level, without braving the unknown deeper in the castle. 

We look again to the south, and here we see, in Room 1 ,6 a sinkhole. I'l 
use my inside knowledge of Sorcerer's Casite to tell you that entering ; 
room with a sinkhole in it will deposit you at some random room at som 
level deeper in the castle. This would appear to be a good time to stop! 

Sorcerer's Casile is an excellent text-based version of the old Wumpus 
The castle complex contains many weird and wonderful things that 
haven't memioned. Things like the occasional Book, which may impar 
great knowledge, or may turn out to be a booby-trap, which will stick t< 
your weapon-arm, thus reducing your effectiveness in a Tight. Or th 
flares, which will momentarily show you the contents of half-a-dozei 
rooms around you. Or the Vendors, who will try and sell you, at vasri 
inflated prices, new armour and weapons (or may even attack you!). 

To see how Wumpus may be interpreted with the addition of graphics 



Although written in mid-1980 the pniBnim onk •.hows its age in onedetai 
It does not, unfortunately, AUTO-RUN on Loading, which is extreme 
unusual nowadays. Although full instructions are included, within tl 
packaging, on how to get started, this is an oversight that should be rem 
died. 

When RUN, the title page informs you that this program is: 
THE VALLEY (48K) 

If you didn't have the expanded Spectrum, you would not be reading tl 
title page! 

After this, however, the program gets much better. A couple of pages i 
'en, giving the player the movement keys (the usual cu 
mbincd keys to givediagonal movement). After this, a menu < 



cnaractcis i» i"- 

those from Dungeons & Dragons, as weu as rroi 
w„ from the character' list, from winch you n 



a cleric 

The character you choose at the start will determine the game's tactics. 
Wizards, lot instance, "ill h;i\c much more i\i-sticn>nh than Barbarians, 
who will! conversely, have a greater combat strength. So the original cha- 
racters must be chosen carefully. As in any conventional role-playing 
game, players will have I heir favourites, and there is a nice little character- 



saving routine which will allow you to continue the game o 1 
ions with t lie same character — or try different characters to see how each 
type fares. 
Incidentally, if you feel a bi 



ad now built a temple to the Lizard 
Tin this task, and set off on her own 



mulct in the Temple of 



Peace reigned over The Vallcv at last, with Alarian the young wizard 
actmg in the dead princess' stead. 

Now, ten thousand years later, the evil wizard Vounim is attempting to 
regain his hold over The Valley. Alarian, as you might expect, is rather 
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computer magazine editors have virulent imaginations? 

The program now sets up the main screen graphics. A "safe path" 
created at random, though it will generally wind from the left hand side i 
ihe screen from the "safe castle" there, across the valley to the right har 



have collected, ; 
power and stam 



"PRINCE OF THE VALLEY" 



Move off the path, however, and the adventurer is fair game for all kind 

And the monsters arc really vile! Here you will meet such lovelies as Bal 
rogs, Ores, Water Imps, Ring Wraiths and Fire Giants amongst man' 
others, with one or two really HEAVY monsters which you would do wei 
to avoid — and about which I am certainly not going to tell you! 

If, and when, yon stumble across a monster, you maybe lucky enough U 
catch ii by surprise, and get in the first blow. You do, though, have th< 
j. There is no bribing in this program — t hi 



"STRIKE QUICKLY!" 

it is no idle command. If you don't respond immediately, you will have k 
the initiative, and the monster will get in the first blow — and this hoi 
true throughout the combat sequence. 



Chapter 4 Graphic, 



Three choices of physical attack are open to you — you may strike at the 
body or limns of your enemy. And you'll find that this method of attack is 
accurate' but takes longer to wear the beast down, allowing him more time 
to slash away at you! Or you may elect to go for the head, which is not so 



ranking spell :s S) I I i'l I . \ 



sed by anybody, regardless of psi 
■reover, it may only be used againsi 



wandering about is a good way of collecting experience points. If 



first of all to navigate the boggy marshland, with (of 
res, and then the moat. Here, a different kind 
fps and deadly Krakens and so on. Having 




o-lK Ih-I 



lit you h. 



though it is, does not tell you what that order is, although the original 
article did (hard luck if you haven't got a copy!). Only after doing all this 
(and don't forget, you'll be fighting every metre of the way), can the 
intrepid traveller then go on to Vounim's Lair, in the forest, to find the 
Helm of Evanna. 

The Helm, however, will only be found when you have achieved the 
rating of War Lord (which is 25 on our scaleof 0 to 28). As it will take many 
hours of play just to get out of the Cannon Fodder classification you can 
see that the Save Character and Game routine is essential. 

The Valley is an almost perfect fusion of many of the elements that go to 
make up I his type of Dungeon and Dragon -orientated game. 

We have, first of all, a good combat system, with adrenalin-pumping 
action, good graphics, good monsters and, a detail that escapes many 
authors, a built-in high score table in the ratings — a character can be built 
up over many hours of play, from lowly Monster Food to Master of 
Destiny. Players will find themselves rooting for favourite characters, who 
become stronger and more potent as each level is reached. 

The interlocked tasks set the player in The Valley are a necessity for the 



they are extremely clear — even to showing thegraphics that will be built up 
from the BIN statements. 

Having survived Vounim's Lair, and the Temple of Y'Nagioth, not to 
mention the six horror-filled floors of the Black Tower, you probably 
think you can sit back and rest. Not a bit of it! 

Now try Crystal's Halls of the Things. Not six, not seven, but eight 
(count 'em!) floors of maze-like corridors crammed with utterly blood- 
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make short work of any nearby Thing. If you find magic projectiles still 
being hurled your way after your flight of arrows, you can loose off more 
arrows, or hurl a few Lightning Bolts, which should do the job. 

If you get really desperate, you may use your sword, bur if you are close 
enough to use this, you will be sustaining some pretty awful wounds. 

By pressing the 1 key, the action is halted, and you are allowed a look at 
the Status Report . This will show you the amount of magic you currently 




A high score is present in the program, and devotees of the novels of Philip 
Jose Farmer will recognise the name of the high scorer, which is Kickaha. 
For all I know, there may well be a fanfare of trumpets and a choir of 
angels when this high score is beaten — it is 100, and I have so far managed 
35 ! Apparently, the game has only been completed once, and that is by the 

But all this is as nothing, when compared to the sheer addictiveness of 
the game. The Halt of the Things has that essential simplicity, once all the 
keys are learnt, that will keep the player coming back again and again to 
play it. 

adventure available for the new machine. In the next chapter we will meet 
some of the inhabitants of these games. 



CHAPTER 5 
Meet the Cast 



We can start having some fun now, and look at the monsters, treasures and 
locations that might be met in the typical adventures. 



Monsters 



The term monsters, for our present purpose, can be applied to any cha- 
racter in the program that is out to do us harm — and they are not always 




first dwarf throws an axe. This must be picked up by the player and then 
thrown at the succeeding dwarves. They are all hurling knives, after the 
initial axe, but if you remember to keep retrieving the axe, you should have 



In Level 9's version of the classic, an endgame is included that extends 



definitely out to get you! The combat system from the role playing games 
like Dungeons & Dragons is often used in these games, as exemplified in 
The Valley. And the monsters themselves, as befits the ancestry of this typo 
of game, are of the leg-ripping, skull-crushing, heart-stopping type 
commonly met in RPGs. There follows a list of some of these lovely things, 



i origins. I've put It 
more respeei (nan, < 



E classic, hurling knives and axes a 



ick-of-all-trades monster — appears in most Tolkienesque adven- 
tures. Extremely vicious and ugly creatures, in groups, and usually 
wielding spears or scimitars. There is an Orcish Archer in one of Level 

Waug 

This appears in The Hobbit. Originally an extremely dangerous crea- 
ture, who often accompanied Ores on their raiding trips, the Waug 
doesn't seem to be active in The Hobbit. Its mission in that game 
appears to be lying around dead. 

Most programs featuring a snake do so to create a problem rather than 
to actively cause a player harm — see the first chapter. 



Often to be found at the top of mountains sitting on Golden Eggs. 
Find a way to frighten them off before attempting to purloin the trea- 



Dragon 

Very frightening and powerful — do not approach unless very strong, 
or very sure of how to cope with it. In The Hobbit, you may need 
help. 



Come in four types: Air, Fire, Earth and Water. You will need magic 
of a sort relating to the Elemental before attempting to fight. 

Vampires 

No need to tell you how to fight these! Before coming across ihem, 
you should have picked up any requisites at other locations (don't turn 
your nose up at that garlic!) 







will keep you informed of your curreni physical status. This may take the 

ing, that a decision on whether or noi to fight with a particular monster 
must be made by you, taking into account your own strength, using 
whatever system the program adheres to, together with your own knowl- 
edge of the monster's own rating. 
Of course, you may be given no forewarning of a monster's presence, 

This son of program would be a very unfair one, and they're not 
common. Mosr games will give you boih a certain pre-knowledge of the 
monster's capabilities and a method of escape should you wish to decline 
the challenge. You may not, though, make good your escape, if the mon- 
srer is a particularly speedy one! 

Spells 



The sort of combat we've spoken about so far, with the system of strength 




ster with a well-aimed spell. This can take the form of a simple "SLEEP" 
spell which lays out the monster for a certain amount of time, to the 
"CRISP1T" spell as seen in The Valley, which annihilates the thing 
completely. Spells of this potency require a great degree of experience to 

Unfortunately, the programs currently available for the machine do 
not, as a rule contain very good, or complex spells. In fact, The Valley is 
one of the most spell -conscious programs around, and that, as we've seen, 
can only boast three spells. 

Another program which features spells, is VelnorS Lair, from Nep- 

The program concerns the black wizard, Velnor, who has gone into 
hiding in the Goblin labyrinth of Mount Elk. Your task, as the adven- 
turer, is to prevent Velnor from metamorphosing into a demon on earth, 
which event will not be good for mankind. You must explore the laby- 
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items found in the labyrinths. 



;i) I'olvmorph- this costs him one spell point {he starts with ten in 
and changes any non-magical, living creature into a harmless fro 
success rate is normally 50%. 




The fact remains, however, that the player looking for a computer 
adventure for this machine, which includes very complex spells, as in 
Dungeons & Dragons and the rest of the role playing games, will, frankly 
be disappointed. It's entirely possible, though, that a magic adventure will 
be released the week before this book! 



Weapons 

At the start of the classic adventure, you are weaponless. You have to find 
your own armoury during the course of the game, and it will probably con- 



;e them against dragons, or sirens, or other monsters. No, they a: 
be beaten by guile — and > ou'll find that the Big Bad Pirate who, evei 
often, rushes in to steal all your hard-won treasure and rushes out aga 
hide it, long before you can throw any axe you may also be carrying! 



Richard Shepherd has written several adi 
machine — some of them use the term rather lo 
fairly good examples of adventures. The text ai 
Superspy, while the graphic is represented by 7 

The plot of Superspy is not entirely unadjacei 




concealed knife 
Walther PPK pistol 
digital watch 



I 



My personal favourite is the Walther PPK — very reminiscent of the 
James Bond stories. You are allowed to choose three weapons from this 
list, and with these must battle the various enemies that you'll meet during 
the program. The opening section of the game is a rather simplistic adven- 
i .'■'"! code-breaking and anagram-solving for its solution. Once 
the first part is behind you, a maze game is begun, in which you must enter 
Dr Death's island and find his lair. In the maze you will come across Jaws, 
and, if you are lucky, escape him! 




might bca[thclOi.aiion.Thedfawit>fiofthefoom.inrwf«.i'/i'ff/no/i7'oivf/- 
is done in BASIC, so is a [ink slower lhan math me -code would accom- 
plish. The difference is roughly .similar to ihe difference between a blink 
and a heartbeat, though, so is quite acceptable. 

The ohject of this adventure is to beard the Count in his Tower. As you 
prowl about the various levels, trying to find your way around, you'll find 
various treasures lying about that may (or may not!) help you in (he final 

The weapons available to the player are; 



These are the obvious ones, but there are also magical weapons, which 
Include: 



without which, a Dracula adventure would not be complete! 

On the first level of the five to be negotiated, there are no weapons to be 
round, and none needed. On the succeeding floors, you will find all the 
objects — and also bats! A certain number of these must be killed on each 

granted a bat-zapping pistol, loaded with ten bullets. The bat flutters about 
whileyouaretryingtodrawabeadonit, and if you art successful in -: n:i: 
)n« ii down, lies in a crumpled heap on the floor of the room. As a last gift 
before dying, each bat will give youa floor plan of the present level, with its 
multitude of rooms to be negotiated. However, if you run out of ammu- 
nition before entering the next level (and you may find other bullets Ivina 
about thecastle), you are transported to a room, at random, somewhere on 



J which. Well, vnu tonkin': "-am linn," r< 



s with deadly weapons, however, is not really t 
ultimate aim of the traditional adventure game — sorry Jason, Ercd ai 
Tom of 2C! The monsters are usually protecting something, and that 



Earlier in this book, we looked at Colossal Adventure, from Level 9. 
This adventure, based, in the first part, on the Crowt her/Woods main- 
frame original, contains many treasures to be collected during the course 
:game. Each of these is worth a certain number of points, and in the 
or text/graphic game, the score is the thing. 

kc a look .u (his situation. You are in a long corridor, in a complex ol 
. You have arrived hen- alio collecting treasures and other objects, 
lid oui what you are presently carrying type INVENTORY (or usu- 
iust 1NV.>. The computer replies: 
)U ARE CARRYING: 



'3 CORRIDOR. TO I HI WES I YOU SET A 
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YOU ARE NOW IN THE DARK CAVE, A FAINT LIGHT 
GLOWS FROM THE ENTRANCE BEHIND YOU. BETTER GET 
SOME LIGHT QUICK. 



nputer merely repeats its m 
F SOME LIGHT. 



YOU FEEL SLIMY I'ENTACI LS ' 
LEGS. 

IT IS A SMALL OCTOPUS. 
Jow the octopus may come in handy here. St 

GET OCTOPUS 
ind the computer come back with: 



WEAR GLOVES 



O.K. I AM NOW WEARING THE BROWN GLOVES 
WHAT DO I DO etc. 



GET OCTOPUS 



rnrn|| j Mttl the Cast 



I HAVE THE OCTOPUS. MANY HANDS MAKE LIGHT 
WORK. A SOFT LIGHT EMANATES FROM AN INVISIBLE 
SOURCE. YOU ARE IN A SMALL CAVE. THERE IS A SMALL 
WOODEN BOX HERE. TO THE NORTH YOU SEE AN 
UNDERGROUND STREAM FLOWING THROUGH A SMALL 
CRACK IN THE ROCK. THROUGH THE CRACK YOU CAN 
JUST MAKE OUT SOMETHING GLITTERING IN THE DARK 




He!He! Some more treasure! Must gel ii! Flushed with justifiable prick 
at our success at using the octopus, we attack the next problem with gusto. 
How are we going to get at that gold in the next cave? 

We can try the direct route, by typing: 
N(for NORTH) 



YOU CAN'T GO THAT WAY 
WHAT NOW? 



mo P re problems our way! There must be a way through the crack . Maybe we 



DROP ALL 



O.K. 

WHAT NOW? 



N 



YOU CAN'T GO THAT WAY 
WHAT NOW? 



YOU MUST BE JOKING - I CAN'T BREATHE 



i help us in the c 
eh we dropped a 
v. Wait, there's a I 



EXAMINE BOX 



O.K. THE BOX IS OPEN. INSIDE YOU SEE AN AQUALUNG. 
Aqualung? Underground stream? 
GET AQUALUNG 
YOU ARE CARRYING: 
THE AQUALUNG 

THE BROWN GLOVES WHICH YOU ARE WEARING 
THERE IS ALSO A SMALL BOX WHICH IS OPEN 

That's alot of stuff to carry! Wait a moment, though, the box might be 
useful. We're told ii is small bul maybe it will carry everything we warn 10 
lake with us, and maybe it will float! 



5 OPEN. IT CONTAINS 7 



THROW BOX 
WHERE? 
IN STREAM 



e computer tells um1i;ii Hie 



O.K. YOU ARE CARRIED ON THE SWIFT CURRENT OF THE 
STREAM THROL GH ! I IE CRACK IN THE ROCK, AND INTO 
A CAVE. THE OCTOPUS HAS GONE BEFORE. MANY 
HANDS HAVE MADE THE LIGHT WORK. ABOVE YOU IS 
THE BANK OF THE STREAM. 
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PART 2 

The Eye of the 
Star Warrior 



CHAPTER 6 

Why a Graphic Adventure? 



at last we're getting down to some serious programming! 

The following section of (he book will describe a graphic adventure, and 
its development . Many of the modules described can be taken arid used in 
your own programs, and the techniques discussed, adapted as you wish. 

Before starling, let's consider the question — why did we choose a 
graphic program? After all, the original classic adventure is text-based, as 

adventure, while being a lot of fun to play, is not much of a surprise after 
being typed in from a listing! 

Having said that, though, you may wish to add to your own text adven- 
ture, and the techniques used in The Eye of the Sior Warrior may be used 
jusi as easily in this situation. F-oi instance, the section on generating the 
room complex will be just as valid in a text game, as will the movement 

First of all, however, let's have a hit of history, which might help explain 
what you're doing in this hellish dungeon! 
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CHAPTER 8 

Create your own Dungeon! 



rst lask, then, is to create the dungeon complex. 
; complex will be spread over three levels, with a maximum of 300 
cells, 100 on each level. It is quite possible to have one large level only, 
if the same 300 cells. It would get rather difficult to find your 
way about after a while, though, and in having different levels, we can 
more easily set different tasks, and varying degrees of difficulty. 

w, although we are eventually going to be moving about a system of 
rooms, and will then be calling them rooms, at this point in the program's 
development, we will be talking also of cells. 

a dungeon complex, we will naturally require a number of individual 
is, through which we can move, and which will contain monsters, and 
(we hope), treasure. These rooms will be inter-connected (unless you want 



1634 REM ittmmm********** 

1635 REM SET UP DUNGEON 

16& rem m*mm****«x***** 

16*8 DIM CC380) 

LEAVE THE COMPUTER SWITCHED ON, OR SAVE THIS LINE! 
This line simply D I Mens ions tt 



AAA 


1 




cell 


cell 


cell 


cell 




#1 


#2 


#3 


,4 





cell cell cell cell 
#297 #298 #299 #300 



it>50 FOR t-1 TO 10. LET CU)«999 

< NEXT « 

This line will create a block in cells 1 to 10, ie the array C will now 
contain, in its first 10 locations, the value 999, which effectively bars the 
player from visiting these particular cells. Let's see what this looks like to 





f\/\n 


1 





















Why cells 1 to 10? Look now at our imaginary three-storey dungeon. 
Figure S 




Aha! An impenetrable wall to the outside. Cells 1 to 10 are now no-go 
areas, and will never contain monsters or treasure. The next three lines do 
the same for the other levels. 
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1«* «* *"S8 TO 110; LET C(«)*9 



Line 1660 creates an impassable barrier at thelast row of Level 1 , and the 
first of the second level, while 

im FOR t-lSB 10 Z10< LET CCD* 
?99< NEXT a 

creates the wall between the second and the third levels. Finally 

16U0 FOR *=290 TO 300' LET CC*)= 
*99> NEXT I 

creates the last barrier at the end of the third level. Now, we need to put in 
the boundaries at the "edges" of the levels 

16*0 FOR I- 11 TO 291 STEP 10 i LE 
i C<. * ;-999 ' NEXT x 
W00 i-O* *-10 TO 308 STEP 10' LE 
i CU)-999' NEXT 4 

These two lines create blocks in steps often, thus creating the remaining 

Look at Figure 6, a plan view of Level 1 to see what has happened. The 
other [wo levels have been treated in the same way. 

To complete the complex, we have to scatter a few walls at random 
throughout our dungeon, to make for a bit of variety in the game. 

As the computer looks through array C, or, as we imagine it, our three 
levels of 100 cells each, on a 10 x 10 matrix, it is going to check the cells 
around each location, to see if any contain the value 999. As we know, this 
value is a marker which tells us that this particular cell, or location, is a 
no-go area. It may not seem important, at the moment, if we have two of 
these wallsjogelher, but let a cell be surrounded by walls and we have an 

may want to write a routine to allow us, maybe to fempt a monster' So 
such a room, and then imprison tJie beast. We may have, for instance, a 
Teleport Spell in order to escape ourselves. 

The computer will also check, at the same time, that there are no 
diagonal walls across the dungeon, thus cutting us off from the rest of the 



1710 LET b-INT <RND*30H30 



questions had been yes, the program would jump back to line 1730 to get a 

In our example, however, the program goes on to line 1760 and asks if 
d - 1 1 (48 - 1 1 = 37) has the value 999, which, again, it doesn't. Does d - 9 
(48 - 9 = 39) = 999? Zounds! it does, and now the program jumps to line 
1780, which returns us to 1730 for a new value. If, on the other hand, no 
"wall" had been found surrounding C(48), that location would have been 
given the value 999, thus making it an impassable wall. 

Now that all our cells are designated either walls, or rooms, we can go on 



1793 LET a-0 

1908 FOR *-ie TO 290 

1810 IF CU)-999 THEN CO TO 184 

1820 LET o-d+1 
1630 LET C(*>-d 
1840 NEXT * 



Now thai our rooms are numbered, the computer will recognise a 
number between 10 and 290 as a clear area, and those locations with the 
value 999, as a wall, and thus impassable. 

One last thing needs to be done before we can leave this phase of the 
program. How do we get between the various levels of the dungeon? 
Having gone to a lot of trouble to set up walls between the levels, we need a 
*ay of bypassing these walls as necessary. 

Stairs have been a successful answer to this problem for several 
:enturies, so let's put some of these in our complex. 

We don't want to make it too easy for adventurers to find their way to 
mother level, so let's put just one staircase on each level. For Level I , we'll 



And so on for the other two levels: 



2390 LET STWQ-INT ( RNE>*90 HI 10 

2409 IF C<STI*i0)«999 THEN GO TO 
*390 

2410 LET STHREE" I NT <RN[>*90>+210 



This finally completes the structural set-up of our dungeon complex. 
And although the routines were written with our final graphic adventure in 
mind, the techniques may just as well be used in your text adventure. 



CHAPTER 9 
All that Glisters. 



On without pause to ihe good bit — populating our new dungeon with the 



because we know the last 10 locations of array C are walls, and v 
to coincide with C. There will be a maximum of one monster to < 
— monsters will not be able to roam around in this dungeon! 



1878 FOR >«10 TO 296 
I860 LET b-iNT <RND*4)+1 
iaSB IF b<2 THEN GO TO 1910 
1900 LET FK*)-INT <RND*15>+1 



appear there. If you remember, Ihe array M will coincide with the array C, 
which holds our network of rooms and walls, and line 1920 ensures that we 
don't start the game having to battle with a monster! (Why are we starting 
the game at C(12)?). 



1930 LET a«INT ( RND*80 H210 
1940 IF CUJ-999 THEN GO TO 1930 
1958 LET MUJ-16 



There is one Lich in our complex. He is the dead Wizard, who we will 
eventually have to battle in the climax to the adventure. He is a very special 
monster, and as such, is to be found somewhere on the third and final level. 
Line 1940ensures that he doesn't end up in a wall, while line 1950 gives him 
a special code of 16. 

Now to the treasures, which are actually mostly weapons. These can be 
dealt with in exactly the same kind of routine. 

19^9 rem ********************* 

1960 REM PUce treasures in 

1961 rem mm*************** 

vm dim 7(290) 

i960 FOR a =i0 TO 298 
1*50 LET b-iNT <RND*4?+1 
2000 IF b<3 THEN GO TO 2020 
£010 LET KtMMT CRND*15H1 
2020 NEXT * 

Array T, which now holds all the information on the treasures to be 
found in the complex, is also congruent with arrays M and C. Thus, as the 
player moves about array C, which holds the physical set-up of the 
dungeon, the other two arrays can be very quickly matched against C to get 
information on monsters and treasures currently at that location in C. 

One last array, S, remains to be DIMensioned. 



206? REM ************** 
2066 REM STORAGE SPACE 

2069 REM mmtmtft, 

2tf?B DIM S<290) 



Array S will hold all the information on treasures that we may drop as we 
move around the dungeon. As with all our other arrays, we only need to 
DIMension the array to 290 locations — the last iOlocationsformawall.in 
array C. This may look, on the face of it, rather wasteful of memory space, 
as, after all, we may only drop one or two treasures throughout the whole 
game. The routine to search through a string, every time we entered a 
room, just in order to check if we had stored a treasure previously, would 
slow up the program by an unacceptable degree. Keeping all our arrays 
congruent, as we have done, our program has only to look through the 
same location in each array, as we enter each room - a very quick and 
economical process. 

Now we have a two-dimensional string MS, which will hold the data on 



^079 REM ********************* 
£ t d0 ^EM READ IN MONSTERS 
2061 REM ********************* 
2ti90 Dir. M$<19,15? 
2100 FOR a-1 TO 19 ; READ M«<a)< 

2110 DATA "Living Skeleton" . "Mum 

nt,aL ^%*mPire","Min'd Van* ire"," 
Wraith", "Dra9on", "Werewolf". "CMC 
lops , "Sandman", "HarPie" , "Giant 
SerPent" , "Balr-o9", "Lich" . "Li9htn 
in9 bolt", 'Stone &Pell", "Limbo s 



2119 REM ********************* 
^20 REM READ IN TREASURES 
2121 REM ********************* 
Z130 DIM T*C25,15> 
2140 FOR fi TO 25' READ T»(a>> 
NEXT * 

2100 DATA "SPADE" i "FIRE WHIP'V'S 
Wi'iRU' , SILVER SWORD". "SILVER STA 
hr", SAINTLY STAFF" , "TALISMAN" , " 
CROSS' • ' SHIELD" /"TORCH" > "INVISIB 
Lt CLOAK"/ "CLUB"/ "HOLY WATER"/ "B 
Uk ANi) ARROWS" / "MAGIC SHIELD", "E 
MPTV BOTTLE", "HEALING WATER", "UI 
iA^DS HflMD ,"TElEPOPT","FORCESHI 
uJ> , "PSYCHIC SHIELD" . "LIGHTNING 
bOLT" , "STONE SPELL" . "LIMBO SPEL 
L% STONE" 



The information on treasures is placed in a string at this point, so that we 
may PRINT the information on-screen during the game. 



CHAPTER 10 
Graphic Violence 



■s 2960 to 3650). Each time 
that particular object willt 

-ever, in The Eye of ihe Sim 



ning these right at the statt, before the main pn 

IB 30RDER 0' INK B' PAPER V- C 
LS ■ PRINT INK 2j BRIGHT 1; FLA 
SH 1IHT 18,8;" 



15 REM « SET GRAPHICS ** 
<!8 FOR «"8 TO 7 
38 REM . . WIZARDS HAND 
33 READ b' POKE USR 
48 READ b' POKE USR 1 
45 REM ..MAP ROOM WITHOUT 

TREASURE 
58 READ b' POKE USR "c"*« 
55 REM ..MAP ROOM WITH 

TREASURE 
68 READ b> POKE USR "d"*» 
r 8 REM . . STONE WALL 
88 READ b> POKE USR 
85 REM . . PLAYER 
98 READ b' POKE USR -J 

188 REM *STAIR3* 

118 READ b- POKE USR "k"t«. 



150 READ b> POKE USR "»■»», b 
160 NEXT * 

m data bin 00081111, bin 11111 
us. sin uii0iii,bin 11110111, bi 

N 11011011, BIN 00111090, BIN 0,81 
N 0,BIN 11011001 
180 DATA BIN 00011111, BIN 11111 
U0,BIN 10000001, BIN 10000801, BI 
N 8.BIN 00111000,BIN 0000001 1, BI 
N 00011100, BIN 11001010 

190 DATA BIN 11111111, BIN 11100 
800.BIN 10000001.BIN 10010101, BI 
N 01100110, BIN 00010008.BIN 0000 
0011, BIN 00111110, BIN 00000010 

200 DATA BIN 111111 11, BIN 11110 
006, BIN 10000001.BIN 10001061, BI 
N 0.BIN 11111110, BIN 00001111,61 
N 01111110, BIN 10110000 

210 DATA BIN 11111111, BIN 11100 
000, BIN 0.BIN 06010100, BIN*110U 
011, BIN 00010000.BIN 00001111, BI 



I1U000.BIN 191 
230 DATA BIN 11111111, BIN 11100 
000, BIN 10000001, BIN 11000001,61 
N 011001 10, BIN 01006100, BIN 0011 
1111, 6IN 00011000, 6IN 01101101 
240 DATA 6IN 06111111, BIN 11110 
000, BIN 11110111, BIN 11110111, BI 

n e,eiN 10080016, eiN luiuii.ei 

N 0.BIN 01101100 



Note thai some of the BIN nu 
of course, are just as valid. The BIN numbers may be a little longer, but, in 
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our opinion, are less prone to typing errors, and are easier to read. They 
also, if you use a little imagination, approximate the shape of the final 
graphic. 

You will also see that the letters in quotes are in lower case. These letters 
— a,b,c,d,i,j,k,l and m — are to be typed in having first gone to 
GRAPHIC mode on the computer (press CAPS SHIFT and the 9 key 
together). In this mode, the machine automatically goes into upper case. 
Throughout the listing, we've kept to showing these letters, rather than the 
graphic symbol you'll see when the program is RUN, thus making it easier 
for you to see which key to press when typing the listing. As a convention, 
we've underlined any letter (always in quotes anyway), that needs to be 

RUN the litllegraphics program, and you'll find that keys now print nice 

Let's start using those graphics. 

We'll get the status display box on to our screens first. 



NEXT • 

I his line prints a nice background to our Status Box. 



2500 PRINT ". 



2510 PRINT PAPER li INK 5, AT 0,1 
yj "ADVENTURE" 

2520 PRINT PAPER li INK 7i AT 4,1 
. STRENGTH 

2530 PRINT PAPER li INK 7, AT 6,2 
2.; rLOOR 

2540 PRINT PAPER li INK 7iAT 8,1 
4 i : STATUS MODE 

2550 PRINT PAPER, li INK 7iAT 10, 
141 "COMBAT RATING 
2560 PRINT PAPER li INK 7iAT 12, 
JO'jNDS 



These lines will print a nice colourful box at the right of the st 
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2480 DIN X*(12. 12) 

£ j6i. REn tmmmmmmt 

25,-8 REM SET UP AND PRINT 

GRAPHICS OF ROOM 
lill "i" *"»*****«**»«»* 
2588 LET XK1.1 TO 12)." 

2538 LET X»!2,l T 0 12). 
iij. " 

2688 FOR «-3 TO 18 
2618 LET ««», 1 TO 12> 

2628 NEXT t 

2638 LET mil.1 TO 12) 
26«3 LET X»<12,1 TO 12) 




26 LET I X F ,< C S^ST" >< . >S99 "* 
26?8 IF C(L0Cf)TI0N-l)<>999 THEN 
LET xt(S,2>-" " 
2 LET ^ ( CCLOCHTION-1 X>999 THEN 
^5? iL J < ' 7 °l : HTiON*l)<>9S9 THEN 
2 LET iK?u2? I ?* flX>Wfl ™ EN 




Finally, we can PRINT X$. Type 



jS30 FOR *-i TO 12 

3*40 P?itil TAB 1;X*<#,1 TO 12) 

3650 NEXT a 

Before we gel to printing our little man, we must define a few variables 

2470 LET FLQOR-1- LET LOCATIONS 
2> LET PX*6> LET PY«6< LET STREN 
b7H«i00= LET COMBflT"0 ; LET SPELL 
■B : LET PER-0; LET WOUNDS*0: LET 
SM-0; LET HELD-0= LET RET=0 ; LE 
T kJHfM>=0< LET STONE-0 



before — but many of them will probably be obvious. The variables we are 
interested in ai the moment, are PX and PY, along with FLOOR and 
LOCATION. These last two are self-explanatory, but the other two are not 
immediately so. PX is the value of the Players X - (or horizontal) position, 
and PY is the Players Y - (or vertical) position. These are set at 6 and 6 at 
the very start ofthegame, and the player starts at LOCATION 12 (the first 
eleven are walls, you'll remember), on FLOOR (or Level) 1 , and at co-ordi- 
nates 6X6. This works out as the middle of our 6X6 playing area. This is the 

array C, array T, array M, and XS. This will save an awful lot of speed in 
the final game, as it wil! not be necessary for the program to check positions 
of all the objects at every move. 



CHAPTER 11 
Make your Move 




square, and to Ihe right, we increment PX by one for each square. North 

decrement by 12. At each stage, however, the values of BOTH PX and PY 
have to be stated. Thus the statement LET (PY + 12,PX) will move us 
south by one square i ic the \enicai axis is changed by 12, while the horizon- 
tal axis remains as it was). 
Type: 



»■»» IF SS-"5- THEN LET TX=TX-1 

4460 It S>-"6" THEN LET TY-TY+1 

4470 IF S*-"7" THEN LET TY-TY-1 

44S0 tF s«.-8" THEN LET TX=TX*1 



4550 IF X»<TY,TX)."i" THEN GO TO 



4568 IF TV<2 OR TY>11 THEN GO TO 
4740 

4570 IF TX<2 OR TX>11 THEN GO TO 
4740 



□w attempted to moveour 
tnd PY would be lost for- 
ueide squad — if they are 



'h'- variables lor the next n 

4660 PRINT HT TY,TX;"j" 
4665 LET PY-TY; LET PjSTX 
0 S 46ef X,(PV ' P><)0 "i" THEN GO T 

» movement is all very well in theory, but at the moment 



'< aaually tali, to the computer t< 



4050 LET RET=8 
4060 LET COHBHT-0 
4070 LET k-0 



4110 LET «-»*l 

4120 IF O-60/FLOOR THEN GO TO 
4930 

4130 IF S»-"" THEN GO TO 40S0 
4140 IF S»""5" OR S*-"6" OR S««" 
7* OR Sf-'S" THEN GO TO 4400 
4150 IF k>-31 THEN GO TO 4860 
4160 LET k"k+l 

4178 LET B«k)-S«: LET BXk-H)-" 

4168 PRINT RT 21,0iB»> BEEP 0.1. 

20 

4iy0 LET *•*+! 

4206 IF «>-607FLOOR THEN GO TO 
4930 

4210 IF INKEYOO" THEN GO TO 4 



4270 GO SUB 68 

4268 IF 6»< TO 4>="TRKE" THEN G 
0 TO 5120 

4290 IF 8S<l>-"r THEN GO TO 54 
40 

4300 IF B*< TO 4>«"DR0P" THEN G 



4320 IF B«( TO 4>""L00K" THEN G 
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There's one last line 10 be explained here. In line 4100, CODE 13 is the 
code for < ENTER> . Whenever your command (held now in BS) is 
ENTERed, the little routine ai line 50 clears the bottom eight lines of the 
screen, B$, or your command along with them. 

50 REM O^ + B0TT0H*8*LII€8* *' 
OF SCREEN 

6G GO SUB 530 

70 FOR d-14 TO 21 

£0 PRINT AT d,0J" 

90 NEXT d 

100 PRINT AT 13, 0J"„" 
118 RETURN 

Line 60 sends us to the routine at 530, which will print our status on the 
status table, and which we will type in soon. 
For the moment, however, lei's look again at our variables in line 2470. 



This is our "prod", the "hurry up and do something" part of the game. 

The player may wish to wander around the complex, admiring the view 
and keeping oui of the way of monsters, but in our game, we want to keep 
him on the move. The way to do this is to decrement his strength at inter- 
vals. The only way to regain strength is to kill monsters, thus giving a pretty 
good incentive to the player to find a monster and start bashing. We could, 
if we felt really mean, reduce strength by 1 at each move — but let's be 
generous, and allow eight moves before the player's strength fails. Each 
room is 8 x 8, thus allowing the player to go from side to side before losing 

SM is incremented by 1 each time a movement command is given, in line 
4500 

4500 LET SM-SH+1 

4010 IF SfK-8 THEN GO TO 4550 



********************** 

r — 

526 REM ' 



325 REM PRINT STATUS TABLE 



STRENGTH<-188 THEN PRIN 
T PAPER 6i INK 9i BRIGHT liAT 2 
*isr MISFIT 

548 IF STRENGTHM98 AND STRENGT 
H<-23fl 1 HEN PRINT PAPER 5; INK 
8; BRIGHT ljAT 2, 16) " JESTER 

356 IF STRENGTH>258 AND STRENGT 
H<-488 THEN PRINT PAPER 4i INK 
it BRIGHT 1;HT 2,16/' HERO 

568 IF STRENGTH>488 AND STRENGT 
W-588 THEN PRINT PAPER 3, INK 
71 BRIGHT liflT 2, 16i " HARRIOR 

578 IF STRENGTH>588 AND SPELL-8 
(HEN PRINT PAPER 7; INK 1; SR 

IGHT ljAT 2,16)" SUPER HERO ■ 
388 IF 3TRENGTH< =588 THEN GO T 

U 618 

398 IF 3PELL>8 AND SPELL<-3 THE 
N PRINT PAPER 6, INK 8; BRIGHT 

DAT 2,161" UIZBRD 

688 IF SPELL>3 THEN PRINT PAP 
ER 2j INK Ij BRIGHT 1, FLASH 1;H 
I 2,16," GRAND WIZARD " 

618 PRINT PAPER 7;AT 4,28;" 

628 IF STRENGTH>9999 THEN LET 
STRENGTH C 9999 

638 PRINT PAPER 7; INK 8,'AT 4, 
2Sj STRENGTH 

648 PRINT PAPER 7; INK 9;AT 6 
29; FLOOR 

658 IF N(L0CATI0N)-8 THEN PRIN 
T PAPER 4, INK 8; BRIGHT ljAT 8 
,26 I" GREEN" 

668 IF C0MBAT>8 THEN GO TO 688 
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CHAPTER 12 
Monster! Monster! 



There is somelhing missing at the moment from our program, and a pretty 
importam something — we haven't yet provided graphics for monsters or 
treasures! 

The first task, and I'm afraid that it's a long one, is to type out all the 
lines for defining these graphics. Starting at line 2970, we input the BIN 
numbers for the SPADE, to start with, and (hen on to all the other objects. 
We won't print all those lines here — turn to the complete listing at the back 
of ihe book, and type in lines 2960 to 3650. 

You'll notice, from the REMarks before each graphic, that many of the 
monsiers share a common lop and (pardon the expression!) bottom. This 
not only saves memory, but also a lot of typing! 

Now for another tiresome bit of typing - lines 1 19 to 520 contain the 
RESTORE routines for all the graphic data that we've just ploughed 
through. 




look (although we think they're pretty good as they are!) 

Each time we enter a new room, ihe program checks to see if any trea- 
sure, or a Monster is present. If the answer is yes, the graphic character, or 
characters, for it is READ, and PRINTED, as appropriate. 



LET jpT< LOCATION) 
275ft IF *-0 OR *>-18 THEN GO TO 

2798 

if -6U GO SUB 130 

2/70 FOR *=0 TO 7- READ b< POKE 
ySR "0"+l,b' NEXT «. 



If there is treasure here (in other words, if array T does indeed hold a 
treasure at this location), the local variable "a" is given the value of the 
treasure. Line 2760 then sends the program back to the RESTORE routine 
at 130, and then on to READ in the necessary graphic characters. Line 2750 
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2798 LET »»3< LOCATION) 
2888 IF »-0 THEN CO TO 2838 
2810 GO SUB 138 

2328 FOR »-8 TO 7- READ b> POKE 
USR X'* 1 '*- NEXT ■ 

2B48 LET *-M<LOCATI0N) 

2858 IF «-8 THEN GO TO 3668 

2868 GO SOB 288 

2878 FOR «»8 TO 7 

2888 READ b< POKE USR "q"-u,b 

2838 READ b< POKE USR "77"*., b 

2388 NEXT i ~ 



2918 LET »"IH L 
438 

2928 FOR «-8 TO 7 
2938 READ b< POKE USR "r"*a,b 
2948 READ b' POKE USR "T"*«,b 
2958 NEXT a - 



reded to build the ei 



e (boih found and stored) in a random 



3668 LET USC-B'LET «FC«8'LET HC 
8' lET SV-ULET SK-liLET MC-l'LET 
WY-1'LET MY=6'LET MX-8'LET PER= 
8'LET BV ^'LET BX-0 

3668 REM PLACE OBJECTS IN NEW 

3669 ren *m*****m*mrn** 

3678 IF T<L0CATI0NX1 OR TCLGCAT 
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iu«»17 THEN GO TO 3718 

JSo8 LET «X-INT (RNDMH4. LET U 

r = I r, r (RNDS5H4 

3698 LET XKUY,UX)«"o" 

3788 LET UFC-UCK LOCATION)) 

3?M IF S(LOCAT10N><1 THEN GO T 

0 3760 

3728 LET SX-INT <RND*5)+4' LET S 
, = Ir,7 iRND*5)+4 

3730 IF SX-WX AND SY=WY THEN GO 

TO 3728 
3(48 LET XKSY>SX)-"P" 
3758 lET HSC"U<S(LOCAT10N)) 
-768 IF T<L0CATI0N)<>8 THEN GO 
10 3380 

3/78 IF T( LOCATION)^ THEN LET 

BY-INT <RND*5>+4 

3788 iF KL0CHTI0N)-8 THEN LET 

Bn-INT <RND*5H4 

3798 IF X»<BY.BXX>" " THEN GO 

TO 3760 



WX and WY are the co-ordinates of the treasure (or Weapons), and are 
set. in line 3680, to at least 4X and 4Y, to leave room for the Healing Well 
and Fire Pit, which we will come to shortly. 3690 puts the co-ordinates into 
XS, and 3700 gives WFC (Found Weapon Colour), the value of the trea- 
sure. SX and SY are the co-ordinates for the Stored Treasure, and in line 
3720, these are given a random value, with line 3730 trapping any attempt 
to give them the same value as WX and WY, which would result in the 
Found Treasure being overprinted by the Stored Treasure. WSC is Stored 
Weapon Colour. 3770 and 3780 give us the co-ordinates for Buried Trea- 
sure (BX and BY), although, being buried, they obviously don't need 
colours. We shall deal more fully with Buried Treasure later. 

And finally, we can PRINT the treasures: 

3878 PRINT INK UFO BRIGHT liAT 
»r,UXl"0" 

3880 PRTRT INK HSC; BRIGHT iiBT 
s>y,SXj';P" 



That sorts out the treasure — but there may also be a monster in the 
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3960 PRINT INK MClBRIGHT llBT MY 



colour (MC) will be taken from lines 2290 to 23 10. To tidy everything up, 
we'll add three lines that send the program to three subroutines. These are 
at 60, which we've typed in already, and which clears the bottom of the 
screen of any text, at 530, and again we've typed this in, and 790. We will 
cover this later, and it PRINTS the information on what we have found in 
the room as we enter it. 

So now we have our little yellow man at the dungeon's entrance, and our 
huge, naming magenta Balrog at centre stage. What now — do we just 
stand looking at each other? Well, yes — at least until we put in a routine to 
get the monster moving! Let's do that now! 

4938 LET TY*MY 1 LET TX-MX 
4935 LET «-0 

4946 IF PY<TY THEN LET TY-TY-i 
4958 IF PY>TY THEN LET TY"TY+1 
4968 IF PX>TX THEN LET TX-TX-H 
49?8 IF PXCTX THEN LET TX-TX-1 
4988 IF TY<3 OR TY>9 OR TX<3 OR 

IX>9 THEN GO TO 4886 

4998 PRINT HT flY,MX;X«MY,HX>ifiT 

«Y,HX*IlXKITr,MX*l> 
5888 PRINT HT MY-H,t1X;X«Cr1Y-H ,MX 

JlAT NY*l,nX*ljX«<MY+l,MX-tl) 
5813 PRINT INK WFCiRT UY,UX;X»C 
UY,HX> 

5828 PRINT INK USCiAT SY,SX;X«C 
SY,6X> 

5838 IF HU-LOCATION THEN PRINT 

INK 5lHT 3,4) "1" 
5848 IF FP-LOCATION THEN PRINT 

INK 2; PHPER 6; BRIGHT 1; FLASH 

DAT 3,41'V' 
5858 IF T< LOCUTION )"8 AND WHAND= 
1 THEN PRINT INK 4i BRIGHT lip 
T BY,8X-2;"»b" 
5868 PRINT HT PY,PX>»i." 
5878 PRINT INK PC MC LOCATION)); 



5868 LET MY-TY' LET HX-TX 
5890 IF HY-PY AND MX-PX OR MY=PY 
HNO MXH-i-PX OR MY-H-PY AND MX-P 
X OS MYH-l-PY AND NXtl-PX THEN G 
0 TO 7590 
5180 GO TO 4880 

In line 4930, we see the same logical work as inthe player's r 
that is, TY and TX are the forward scouts for MY and MX, the monster's 
co-ordinates. 4940 sees a difference, however. As you'll remember, PX 



corner. Iine4980 picks this up ;uul rclurm us 
le, where the whole procedure starts again. 
Assuming, though, that the Monster is still on the move, line 5070 
PRINTS its graphics at the co-ordinates found by TY and TX. These varia- 
bles are then replaced by the main variables, MX and MY. 



Actually, this routine is the Combat Defence routine 
Combat Attack routine which we shall go into later, but ft 
ster has attacked you, and you must defend. 

Before the player can attack a monster, or defend hims 

worry, we'll be back to monster-bashing soon enough! 



CHAPTER 13 
Trusty Weapons 



ill have to avoid them 



iphies have been displayed. This list includes infor- 



is well as which monster 



:o the player's possession, where it will remain 



788 REM PRINT OUT CONTENTS OF 



-hi rem nmnutuwit 

790 LET r-T(LOCfiTION) 
SOU IF I--8 OR r-99 THEN CO TO 
830 

810 IF r-18 THEN CO TO 988 
628 GO TO 848 

838 IF S<L0CHTI0N)-8 THEN CO T 
0 928 

848 PRINT "You hnvt foumii "i 
858 IF r-B OR r-99 THEN CO TO 
878 

868 PRINT TKr) 
878 LET r-S< LOCATION) 
688 IF f-8 THEN GO TO 928 
898 IF T(L0CHTI0N« OR TCLOCFIT 
IONJ-99 THEN GO TO 918 
988 PRINT -md "I 
918 PRINT T«r> 

928 IF CONBRT-3 THEN CO TO 948 
925 IF M( LOCATION ><>8 THEN PRI 
Hi "ih« roon ii otitrdtd b» i» 



930 IF M< LOCATION ><>0 THEN PRI 
NT P«<r1< LOCATION)) 

948 IF X«<3,10)-"k" THEN PRINT 

"you »ee »t*ir. in the corner." 

930 IF X«3,4)."l' THEN PRINT 
"you »ee a healing well." 

960 IF X«<3.4>-"»" THEN PRINT 
"you Mt * fire Pit." 

970 RETURN 

990 PRINT "you h.ve found the 9 
ho.tl» h*rtd of the 9ood Wizard. 
It i. .our. until »ou find th. • 

990 FOR r-1 TO 12 
1000 IF rXr-X. THEN GO TO 1020 
1010 NEXT r 
1020 LET H<r>.lB 
1030 LET UHHND-1 
1040 LET TCL0CATI0N>-99 
1030 GO TO 920 

If the player likes what he finds, and can get past the monster to get it. he 
will want to TAKE the treasure, and this is where the TAKE module comes 



5109 REM »«»»*»»*«*«***» 

5110 REN TAKE OBJECT 

5111 rem tmwmtmmmxt 

5120 IF X*Py,PX><>"l" THEN GO 
TO 5200 

3130 FOR r-1 TO 12 

5140 IF H<r)-16 THEN CO TO 3170 

5150 NEXT r 

3160 PRINT "you need «n e«r?t» bo 
ttlt to collect water from t 
hi he«lin9 mil.'. CO TO 4040 
5170 LET H<r>-17 
5180 PRINT -you h.ve collected < 
bottle fullof he«lin9 w«ter." 
5198 CO TO 4848 

3200 if x«py,PX)-'o' or x«py,p 

KWr" THEN CO TO 3238 

3210 PRINT "I tee notMr* to Pic 

k UP." 
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3220 CO TO 4048 

3230 IF HELD<5 THEN GO TO 3260 

5240 PRINT "Sorry i *ou cannot ca 

rra annmor* treasure*." 

3250 GO TO 4948 

5260 FOR r-1 TO 12 

5270 IF HCr)-0 THEN GO TO 5300 

3280 NEXT r 

5290 GO TO 5240 

5300 IF X»<PY,PX>-"a" THEN LET 
H<r)«T( LOCATION) 
5310 IF X»<PY,PX)«"P" THEN LET 
HCr)-SCL0CRTI0N> 
5320 PRINT "YOU i 



5330 IF X«P 
I Tit T< LOCATION)) 
5340 IF X*PY,PX)-"I 



THEN PR IN 



5360 IF X«(PY,PX>"0" THEN LET 
K LOCATION )-99 

5370 IF X»<PY,PX>-"P" THEN LET 

S( LOCATION )-0 

5380 LET X«CPY,PX>«" " 

5398 LET r«INT <RNC>*290>+1 

5480 IF C<r)-999 OR TCr)-18 THEN 

CO TO 5390 
5410 LET Ur)-INT <RNM15)+1 
5420 GO TO 4040 



any Healing Water. IfH(r)= 16, the Empty Bottle, you are allowed to pick 
up a bottle full of water — if not, line 




he may pick up something more useful to him. 
doing this, why not let him see an inventory of what he is carrying? 
rust of all, let's put the command in the Command Input module: 

4298 IF E*1)."I" THEN CO TO 54 
48 

And then the Invent module: 

5429 REM ****«» 

5438 REM INVENT 

5431 REM «**«» 

5440 CO SUB 68 

5458 LET d-13' LET r-8 

5468 FOR b-1 TO 12 

5478 IF HCtO-8 THEN CO TO 3528 

3488 LET d-d+1 

3498 IF d-28 THEN LET r-17 

3588 IF d-28 THEN LET d-14 

5318 PRINT AT d.DTXHCtO) 

3328 NEXT b 

5538 IF C0MBftT>8 THEN GO TO 333 

5548 CO TO 4848 
5558 PAUSE 388 

5568 IF C0M8HT"1 THEN CO TO 714 
8 

3578 IF COMBAT-2 THEN GO TO 761 
8 

5575 IF C0M8AT-3 THEN GO TO 889 



5440 sends the program back to clear the bottom eight lines in prepara- 
n for the inventory list. Lines 5470to 5520 PRINT a list of the treasures 
x currently hold, and then the program goes back to Command.Input 
rfule for your next command. If you are in the middle of a combat 
luence, however (checked in line 5530), line 5550 counts down from 100 
m on to the Defence or Attack module, 



d now the player may, if he wishes drop an item of treasure. 



5579 REM **** 
5588 REM DROP 
5561 REM **** 
5598 LET RET-1 

5688 IF PY-2 OR PY-U OR PX-2 OR 
PX-11 THEN GO TO 3628 
5618 GO TO 5648 

3628 PRINT "You cannot drop objt 

ctt in the doorway. " 

5b38 GO TO 4848 

5648 LET BKktl)-"" 

5658 LET S»-B«6 TO 28) 

5668 FOR r-1 TO 22 

5678 IF S«-T«r> THEN GO TO 571 

3688 NEXT r 

5698 PRINT " I don't understand u 

hat you wantme to drop." 

5788 CO TO 4848 

5718 IF r<18 THEN GO TO 5788 

572B IF r<>18 OR r<>25 THEN CO 

TO 5768 

5738 PRINT -You cannot drop the" 
3748 PRINT T«r> 
5758 GO TO 4848 

3768 PRINT "You cannot drop Idn 
thing that txitts in sour lienor 

5778 CO TO 4848 

578B FOR b"l TO 12 

5798 IF H<b>-r THEN CO TO 5838 

5888 NEXT b 

5618 PRINT "You cannot drop lone 

3828 GO TO 4848 
5638 LET H<b)-8 

5048 IF S< LOCATION >-8 OR T( LOCAT 
IONJ-99 THEN GO TO 5878 
5858 PRINT "Invi.ible I»P» c«rr» 
off the treasure sou have Ju 



5860 GO TO 5960 
5890 LET S<Li 
5900 00 SUB 2790 
5910 LET SX-INT <RND*5>+4' LET S 
r-iNT <RND*5>*4 

5920 IF X»(SY,SX><>" ' THEN GO 
TO 5910 

5930 LET XXSY.SX).'^ ' LET HSC= 

5940 PRINT INK USC; BRIGHT HOT 
St,S*,xs<SY,SX) 
5950 GO TO 6020 
5960 LET T<L0CPTI0N)-r 
5970 GO SUB 2740 
5980 LET UY-INT (RND*5)+4' LET U 
X-INT <RND*5)+4 

5990 IF XKUY.UOO" ■ THEN GO 
10 5930 

6000 LET X»<UY,WX)-'V' LET MFC- 

6010 PRINT INK HFC, BRIGHT liflT 

l„r,us,X«UY,UX> 
b020 PRINT rVT PY,PXj"j" 
6030 IF M<LOCflTIONX>TTHEN PRI 
NT INK P<M<LOCP.TION>)1 BRIGHT 1 

iht NY,nxj"WirVr nY*i,nxi"rt" 

6040 LET HELT-HELD-l — 
6050 GO TO 4030 

Line 5600ensures that nothing is dropped in the doorway, and lines 5640 
to 5680 check the player's input with the list of treasure in T$, to make sure 
is been made. Only one treasure may be dropped in a 



same time. We've used this method of updating before, and it saves a lot of 
time, compared with going to an update module every time it was needed. 

Now that our player is fully equipped with appropriate weapons, he can 
face the monster. There are two modules that we can turn to during the 
Combat Phase — the first we need will be the Defence routine. Type this in 
now, and we'll discuss the details once you've completed this chore. 



7569 REM ********************* 

7590 RE Pi COMBAT DEFENCE 

7591 REM Y tt l l llll.i mi ll Htl 
7600 IF M<LOCRTI0N)-16 THEN GO 
TO 8060 

7610 GO SUB 60 

i-620 LET COMBHT-2 

7630 IF M< LOCATION)*? THEN GO S 

uB 1410 

7640 PRINT "You Are under attack 

choose aourdefence. " 
7650 IF INKEY*<>"" THEN GO TO 7 
650 

,660 INPUT S* 

,670 IF S*-"i" OR S*="INVENT" TH 
Err GO TO 5440 

7660 IF S»-"L00K" THEN GO TO 48 
7690 GO SUB 60 

7706 PRINT "Choose sour defence. 

7710 IF LEN S»>32 THEN GO TO 77 

7720 PRINT INK 5, BRIGHT lrS* 

77^0 GO SUB 1070 

7746 IF r>0 THEN GO TO 7770 

7t'50 GO SUB 1479 

.760 GO TO 7640 

r ,70 GO SUB 1150 

,780 IF TRE-1 THEN GO TO 7820 

7790 PRINT "You cant use that." 

,800 IF COMBBT-3 THEN GO TO 303 

0 

7810 GO TO 7980 

7820 IF S«» "TELEPORT" THEN GO T 
0 6720 

, 830 LET ktERPON-r 

7840 LET STRENGTH=STRENGTH-( 1+WO 

UNDS) 

7850 IF r>18 THEN LET STRENGTH- 
S7RENG7H-49 
c6± O'J SUB 1320 
7878 IF r>0 THEN GO TO 7920 
7860 PRINT "Your defence did not 



7*38 GO SUB 1528 
7*40 FOR r-1 TO 58 > NEXT r 
7953 IF CQMBflT=3 THEN GO TO 812 

7560 GO TO 7140 

Line 7600 sen is us to the Lich-fighting module, if he is the monster in the 
present room. If he isn't (and there's only one of him anyway), we go on to 

variable COMBAT, while 7630 cheeks for the presence of the Mind Vam- 
pire, who rates a special subroutine of his own, at 1410. Once asked to 
choose a weapon to defend, your answer is placed in SS, which is then 
compared, in lines 7670 and 7680. These two lines cheek to see if you have 
asked for an inventory of weapons currently held, or a sneaky look at what 
is in the room. We give this option to the player, because in the panic of the 
situation, he will probably have completely forgotten what he is holding, 
and what he is actually fighting in this room! 

ons — now type in tt 

4839 REM 1 

4848 REM LOOK COMMAND 
4841 REM ********************* 
4850 GO SUB 60 
4868 GO SUB 790 

4870 IF CGMBRT>0 THEN GO TO 4890 
4880 GO TO 4040 

4890 IF CQMBHT-3 THEN PRINT "Tht 
Lich it ctUdtim *ou with *"iM 
*M< LOCATION)) 
4900 PAUSE 300 

4905 IF COMBHT-1 THEN GO TO 7140 



The Look module is a fairly simple one — merely updating the Contents 
display according to what is in the room you are currently in. We will be 
typing this routine in shortly. 
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In the meantime, the playeris still inthe Defence mode, and after visiting 
the Inventory module, or the Look module, is returned to line 7700. Line 
: on-screen as the player makes it , and then goes to 



INTO NUMBERS 
1061 REM ********************* 
1070 DIM V«LEN $$■) 
1080 FOR r-1 TO 25 
1090 LET Vt-TXr) 
1100 IF Vt-S* THEN RETURN 
1110 NEXT r 
1120 LET r-e 
1130 RETURN 



"I his II 

check is valid, that is, if the input is indeed the name of a treasure, then "r" 
is given the value of that treasure and the program returned to our Defence 
module, at line 7740. If an invalid choice has been made, that is if the player 
should accidentally type "sausages" as a choice of weapon, the program 
goes to line 1470 to say that it does not understand, then clears the bottom 
eight lines, ready for another input. If the program accepts the input as 
valid, it then carries on to check that the weapon asked for, is actually 

1139 REM ********************* 

1140 REM CHECK FOR TREASURE 
U41 REM ********************* 
1158 LET TRE-0 

U60 FOR b-1 TO 12 

1170 IF HCb>-r THEN GO TO 1208 

1180 NEXT b 

H90 RETURN 



TRE is set to 0 to begin with, and then line 1 160 sets up a loop of twelve 
passes (12 being the maximum number of treasures that the player can 
carry, at any time). If the weapon is, indeed, presently in the player's poss- 
ession, we go on to line 1200, which resets TRE to the value 1 . 



fact. Otherwise, the program goe 
given the value of "r", found in o 

STRENGTH is decremented by 
or weapon is used, and by a lot more when a spell is used (line 7850). 

If the adventurer has chosen unwisely, line 7800 sends him to be killed at 
8030, and on to the Restatt module at 6850. 

7860 is really the core of this module. Each monster has a Combat 
rating, as we've seen, and only certain weapons may be used against it. The 
little module at 1320 checks the effect of the weapon that the player has 
chosen, to defend himself against the monster: 

13ti9 REM HI III I I I IIIIII H I I II 

1318 REM CHECK YOUR DEFENCE 

132B LET B«-D»(M(LOCflTI0N>> 
1J3B FOR a-1 TO 18 STEP 2 
1348 LET Si-B«« TO «*1> 
USB IF S»-" " THEN GO TO 1388 
1368 IF VOL S«-r THEN RETURN 
1378 NEXT • 
1388 LET r-B 
1398 RETURN 

When the program returns to the Defencemodule, it will have a value for 
"r" — if it is more than 0, that is, if the player's choke of weapon is found 
to be effective against this particular monster, then wego on to themessage 
at line 7920. If, however, the weapon was unwisely chosen, we go to the 
Damage Weapon module. Even if the player defended well, there is a 
danger of the weapon being damaged, but. at least it will have done its job. 

1589 rem immummrom 

1010 REM DAMAGE WEAPONS 

1011 REM ********************* 
1520 IF HEAP0N=13 OR WEAP0N=17 T 
HEN GO TO 1578 

13=3 IF UEAP0NM6 THEN RETURN 

ISM uET h=INT (RNDJ98H1 

1548 IF r«W0UNDS*18>KC0MBAT*18 

X98 THEN RETURN 

1559 PRINT "You have damaged the 



,068 PRINT TS(WEAPON) 
1065 PAUSE 188 



1098 NEXT a 

,688 IF »EA?0N=13 OR UEAPON-1? T 
HLN GO TO 1625 

it,85 L.E7 anj-e 

11,18 LET HELD»HELD-1 
1628 RETURN 



Damage to Weapon module. The first line, 1520, t 




le for the number of weapons currently held by the 

bat Defence module we go, where line 7940 causes the 
or a while, as "r" counts from I to 50. Then line 7950 
COMBAT — if the value is 3, this means that you ate 
he Lich. If the player has chosen the wrong weapon or 
inately, dead! 

Otherwise, we are returned to the Attack module, to allow the player his 

First of all, the bottom eight lines of the screen are cleared, as usual, and 
theinformation that the player is now in Attack mode flashed on the Status 
box (by the Display routine at 530). 



7168 IF INKEY*<>"" THEN GO TO 7 
168 

,178 INPUT S» 

7188 IF S»-"U" OR S«="S" OR S««" 
n OK S«-"E" THEN GO TO 4488 
7198 IF S«="I" OR S«>"INVENT" TH 



7218 IF LEN S»>32 THEN GO TO 72 



In the Attack mode, the playet has the choice of moving away from the 
monster, and 7 180 checks SS to see if this option has been taken. If it has, 
we are sent back to the Move Player module at 4410: 
4420 IF S«""S" THEN LET S«="6" 
4438 IF SS="N" THEN LET S«="7" 
4448 IF S*-"E" THEN LET S««"8" 
4458 IF S»""5" THEN LET TX-TX-1 
4468 IF S*«"6'' THEN LET TY=TY+1 
4478 IF Si="? ' THEN LET TY-TY-1 
44to8 ir S*="3" THEN LET TX=TX+1 



module, in checking 1 1 

7218 IF LEN S»32THEN GO TO 7238 
r228 PRINT INK 5; BRIGHT 1 i S* 
,230 GU 3uB 1878 
?248 IF r>8 THEN GO TO 7278 
!2M GO SUB 1478 
7268 GO TO 7158 
72,y GU SUS 1158 
7288 IF TRE=1 THEN GO TO 7318 



If the player has mis-typed (a very costly mistake in this game!), or asked 
for a weapon that he doesn't possess (ditto!), the Attack Phase finishes. 
Having made the right choice, however, the Attack Phase continues with: 

7310 IF S«- ,; TELEPORT' 1 THEN GO T 
U 6720 

7320 LET 3TRENGTH"STRENGTH-< wOUN 
E>i>l) 

7338 IF r>18 THEN LET STRENGTH" 

STRENGTH-43 

7340 LET UEflPONT 




7438 PRINT I1><M< LOCATION)) 

7440 LET PER*PER+10 

7458 IF FER7100 THEN LET PER-10 

7455 GO SUB 1528 



7468 GO TO 7618 




,464 FRIHT rt*(M< LOCATION)) 

t*96 LET M(LGCATION)=0 

?300_ PRINT AT MY* MX j X*< MY, I1X >> X* 

/0*y Fr.INT AT MY+1,MXjX*(MY+1,MX 

?32B PRINT RT PY.PX;'^' 



rePRINTed, as is the player graphic at PY.PX. 
7532 fflUSE 188 

gives a short wait, and then all the variables a 

7548 LET STRENGTH-STRENGTH* 100- 

PER) 

7558 LET C0HBflT-e> LET PER-0 
7360 GO SUB 0050 
7370 LET MY-0> Lf 
7560 GO TO 4038 

And finally, the program returns us to the Input Command module, tl 
await the player's next command. 

Hurvinfl discussed ihc l wo Combat modules, which are the heart of thi 
whole program, we must type in three routines that are very important U 
both of the Combat modules. 

The first one is the routine to read the values for the player's Attacl 
weapons. Only certain weapons are of any use against particular monster: 
— for instance, a Spade can do a lot of damage to a Living Skeleton, but at 
Invisible Cloak won't damage him at all! Similarly, in defending himsel: 
against an attacking monster, the player has to choose the correct weapon 

The second module checks the values of the player's defence weapons 
which depends on the particular monster he is defending against. 

The third module gives a combat rating to each monster, which is used tc 
calculate that monster's chances of wounding or killing the player. 

So let's type in the first module, which is our Attack Weapon Data: 

2159 REM ********************* 
£160 REM READ IN ATTACK WEAPONS 

FOR EACH MONSTER 
Zlbl REM ********************* 
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2324 , 06071324 " , " 0204058610 1 322 
„324 , '020405061013222324", "0687 
24 , 8384222324" , " 82848687 182223 
*4' ,- 038414222324^ '010506871213 
222324", : 32830414222324", "828384 
18222324" , "03840714222324" , "2324 

A$ is DIMensioned to 16,20. This allows for data on 16 monsters, the 
maximum amount of data being 20characters long. Notice that most of the 
0s are leading zeros — that is, the program will only accept two-digit num- 

The Defence Weapon Data module is similar: 



2 REM ********************* 

keh read in defence 
weapons agrinst each 

MONSTER 

2201 REM ********************* 

2210 DIH D« 19*18) 

2220 FOR *-l TO 19 ! READ D*<*)' 

223d i>HTA "09111319", "020910U15 
kS" , 8788151920", "028709101 11519 
V 871319", "02070609101 1131519", 



0209181 ii3iS ."091 113131928". "8 
28910111519 ."820910111519". "070 
yl»9"< "192021", "1520", "21". "21" 



And finally, the Combat Rating module assigns values to array V, so 
that each monster has a unique rating to start combat — that value will 
always be the same, at least to start with. This is the reason for these values 
being placed in an array, rather than a string, as with the weapon lists, from 
which different information will have to be taken at different times. 



^248 REM COMBAT RATINGS 

DIM VC16) 



^26a FOR a=l TO 16: read VC a> H 
2270 DflTfl 70,70,20,46,70,50.30,5 



Having spoken of normal monsters, there are a couple which ai 
the ordinary, and both have their own module. 

The first of these is the Mind Vampire. His unfortunate effect is 
your mind of any spells thai you may have found — very nasty, 
larly as you cannot fight the Lich without a spell! 

1418 GO SUB 60 
MM FOB r-1 TO 12 
1430 IF H<r)>18 THEN LET H<r>-8 
1440 NEXT r 
1445 LET SPELL-0 

1450 PRINT "four mind Is being d 
1460 RETURN 

1470 PRINT INK 2j BRIGHT 1, FLU 
SN11- I dont understand. 



After clearing the screen, the module cycles through array H, which is 
the treasure held by the player. When and if the program finds any treasure 
with a value greater than 18 (that is, a spell), it replaces it with the value 0, 



jumps to the module at 8060 



,s the Lich in his wanderings, the program 



B068 lET LICH-INT ( RNO*200 >»508 
8078 LET C0MBflT«3 
8080 LET SP-INT CRNDJ3W1? 
8090 GO SOS 60 

8100 PRINT -The Lich attacks. Pr- 
otect j our- self from « MIKspi 
S105 LET f1( LOCATION >.SP 
SirO GO TO 7650 



8140 LET «< LOCUTION 1-16 
;,. x _L7 PER-20 
8168 PRINT "The 



ch has exhaust 



GO TO 7140 

first line sets the Lich's strength to a random, but very high, figure, 
8080 gives him one of three spells to throw at the player in the first 
of combat Each time the player defends well, the Lich loses 50 
prints of st rength. until, when the variable LICH is less than 50, the player 

' Stoukfti pUyei defeat the Lich, the program goes to the module at 



6199 REM L , 

iU.i fiEfi uCh S SEflTH 
3281 REM t'" 



o, r.,-,e 3tarvjarrlor. Now i 

t DESTROY it. The hand of the 
wizard vanishes. Its job is 

over. " 
821:0 FOR r«l TO 12 
3238 IF H<r)-18 THEN LET H<r>-2 
5 

8248 NEXT r 

3*38 lET «HRNl)-e. LET ST0NE=1 
8268 GO TO 7490 

82IOannounces the fact, and 8220, 8230 and 
H for the Wizard's Hand, replacing it 
and STONE is 



CHAPTER 14 
"I Spell a Rat. 



How to fight the Lich? Obviously none of your ordinary weapons like the 
Spade, or even Ihe Invisible Cloak are going to help the player in this 
situation! 

Well we provided some special weapons for the confrontation, and these 
are spells, of one sort or another. They are not, of course, just lying about 
waiting to be picked up. Let's see how the player can get to them. 

When seeding the dungeon complex ai the start of the game, the pro- 
gram makes roughly 1 in every 4 treasures, a buried treasure, with a value 

Because this treasure is buried, the player needs some kind of aid in 
finding, and recovering it. The next module will introduce this help to the 



2030 REM * ADD WIZARDS HAND * 

2040 LET »-INT (RNM70H2B 

2050 IF CUJ-999 THEN GO TO 284 

0 

2060 LET T<*)-18 



The Wizard's Hand is placed in the first level, somewhere around the 
middle of the floor, between locations 20 and 70. 

WHAND is set, in line 2470, to 0. As we found when typing in the Con- 
tents module, WHAND is then set to 1 , when and if the player finds the 
Hand in his wanderings. 




pointed out to him? Well, one method of getting buried treasure is to dig 
for it, and you will probably have noticed, in the list of treasure data, a 
Spade — in fact, it is number one on the list. Once one of these has been 
found, and TAKEn, the player may use it to dig up the treasure indicated 
by the Wizard's Hand. 
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6298>F0R r-lTO 12 
6388 IF H<r>-1 THEN CO TO 6348 
6318 NEXT r 

6328 PRINT "You will netd a iptt) 
6338 GO TO 4848 

6348 IF BY-PY BND BX-PX THEN CO 
TO 6378 

6358 PRINT "Th«rt it nothino. bur 
6368 GO TO 4848 

6378 IF NHBND-1 THEN GO TO 6488 
6388 PRINT "You won't find burit 
6 trtaiurt without tht Wizard* 
hind. " 

6398 GO TO 4848 



These first Few lines of the Dig module ensure that the player is carrying a 
Spade, with which to dig, and the Wizard's Hand, which will show him 

6488 LET r»INT <RND*4!*1 

6418 PRINT BT BY,BX-2;X»(BY,BX-2 

>>XKBY,BX-1> 

6428 GO SUB 68 

6438 IF r>2 THEN LET MKT <RND 
»6»19 

6448 IF r<-2 THEN LET b«INT <RN 
D*15)+l 

6438 IF b>IB THEN CO TO 6558 

6468 LET T( LOCATION >"b 

6478 PRINT "You h«vt found' ")T» 

lb) 

6488 LET UY-BY' LET UX-BX 
6498 LET BY-8< LET BX-8 
6588 LET RET-1 
6518 GO SUB 2748 



6400 gives "r" a random value between I and 4, and, after PRINTing 
the Hand in line 6410, and clearing the screen with subroutine 60, the pro- 
gram moves on to lines 6430 and 6440. These two lines take the value of 
"r" and depending on whether it is less than, or greater than 2, give the 

spell. The valueof the treasure ("b") is put into T(LOCATION) for future 

IIS 
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rush about planting treasure as the player picks up. They will plant the 




6610 LET BY«0: LET BX«0 

6620 FOR r-1 TO 12 

6630 IF H<r)-t) THEN GO TO 4040 



6650 FOR r-1 TO 12 

6660 IF H<r>-8 THEN GO TO 6680 

6670 NEXT r 

b680 LET H<r)-b 

6690 LET SPELL-SPELL+1 

6700 GO TO 4040 



BY and BX, being redundant now, are set to 0 at line 6610. Lines 
6620-6640, and 6650- 6670 are two little loops that check the value in 
array H (the player's present treasure-holding), against what the player has 
picked up. A spell is held in the adventurer's memory, so, unless his mind is 
wiped clean by a mind vampire, he need only pick up one spell, of a particu- 
lar sort. The lines here checktoseeiftheplayer iscarryingaspellorthe sort 
he has picked up, and either return him to the Input Command module, or 
increment SPELL. In the case of ordinary treasure, he is anyway returned 
to the Input Command module, which allows him to TAKE the treasure, 

whisk you away from the scene of a battle to an unspecified location within 
the dungeon. You'll see, from line 7310 and 7820 that the program pro- 
vides for the player selecting this option in both the defence and attack 
modes. The module at 6720 first of all - yes, you guessed it, clears the 
bottom eight lines of the screen. 

6709 REM ******** 

6710 REM TELEP0RT 

6711 REM ******** 
6728 GO SUB 60 
6740 FOR d-1 TO 12 

6740 IF HtdMS THEN GO TO 6788 
br-50 NEXT d 

6768 PRINT "You don't know that 
•Mil." 

6770 GO TO 4040 




CHAPTER 15 
Nice and Tidy. 



Apples and pears.... 

We have talked aboul the different levels of the dungeon — three in fact - 
and we have created stairs between them. 
Now to PRINT the graphics in the appropriate place: 



LET *»C3.18>«"k" 
Now we should allow our player to be able to climb and d< 



6129 REM ********************* 

6138 REM CLIMB STAIRS 
6131 REM ********************* 
6148 IF X«<PY,PX>""k" THEN CO T 
0 6178 

6158 PRINT "You can't do that — 
kou mult find tht tt«iru«a." 
6168 CO TO 4848 

6178 IF Bti TO 2>-"UP" AND LOCRT 
,0N«SThREE THEN GO TO 6268 
6188 IF BK TO 4>-"D0UN" AND LOC 
ATI0N-SONE THEN CO TO 6268 
6198 IF B»( TO 2>«"UP" AND LOCRT 
10N-STUO THEN LET LOCATION-STHR 
EE 

6288 IF BSC TO 2>-"UP" AND LOCRT 
10N-S0NE THEN LET LOCBTION-STU0 
6218 IF m TO «>-OOMN' AND LOC 
RTION-STHO THEN LET L0CAT10N-S0 



6220 IF B*< TO 4)-"D0UN" RND 
R7ION-STHREE THEN LET LOCATION- 

6230 IF BSC TO 2)«"UP" THEN LET 
FLUQR-FLOQR+1 

6240 IF B*( TO 4>-"[>0WN" THEN L 
£T FLQQR*FL00R-1 
6250 GO TO 2580 

6260 PRINT "You c«r>'t So that w* 
6270 GO TO 4048 



the player's i 
as "DOWN" 

player worked out. The variable FLOOR is also amended as necessary, the 
new room's graphics set up and PRINTed, and finally, the program 
returns once more to the Input Command module. 

Have a drink on me 

Having placed the dread Lich on the top, and most dangerous level, we 
could put a tittle spice into the program by adding something different 
from all the other treasures, one on each of the other levels. If you plan to 
write your own adventures, this is a good technique to keep the player's 



243tJ>LET HW-iNT <RND*90)+1 
2440 IF C<HW)-999 THEN GO TO 24 
30 



Places HW, the variable for the Healing Well, in XS, ready to be PRINTed 
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4670 IF X*(PY,PX><>"1" THEN GO 
TO 4665 

4675 LET WOUNDS-0 
4660 GO SUB 530 

And the program returns to 530, in order to update the screen display. 

Otherwise the player may, after finding a Bottle, fill it from the Well, 
and carry it to the upper levels — only one drink is allowed, however, 
though the player may return for more water at any time. 

"You're getting warmer. . ." 

On the second Level, we can place the Fire Pit. This is where the player will 
bring the Stone (The Eye of the Star Warrior), oi 
to defeat the Lich. This is set up and PRINTed in exactly the si 



in the Lich's death module already — the transfer of the Stone occurs at 
line 8250, which sets the value of variable STONE from 0 to 1 . The same 
line changes the value of WHAND from 1 to 0, thus effecting the 
changeover. Now the player has to negotiate his way through the third level 
again, back to the second level, where the Fire Pit is situated. Moving onto 
the Fire Pit's position will end the game, and the player has won. 
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4768 IF S<«"6' THEN LET LOCFVTIO 
(M.OOdTION»ie 

4778 IF S»» '6" THEN LET PY=2 

4788 IF S»-V" THEN LET LOCHTIO 

N-mcnTiot-ie 

*m if S<- r THEN LET PY-11 
4888 IF 3*- '3" THEN LET LOCflTIO 
ri-LOC8TION»i 

48 IB IF S«-"S" THEN LET PX-2 
4828 FOR cl TO «. PRINT ST r.0 
I " ■ ' NEXT r- 

4838 CO TO 2588 

These lines should be fairly obvious to us by now. Lines 4560 and 4570 
have sent us here, the program having picked up the fact that the player is 
standing in the doorway of the previous room. The first set of lines, 
4740-4810, reading the cursor keys, and updating to the required loca- 
tion. Line 4820 prints lines of blanks, thus clearing the previous room 
display.and the program returns to line 2580, where the new room's 
graphics are PRINTed. 



s likely to forget exactly » 



So let's provide a little map for him. Type 



6699 REM *** 
6708 REPI MRP 
8701 REM »*» 

81*18 IF FL00R-1 THEN LET tell 

8728 IF FL00R-2 THEN LET Mil 

8738 IF FLOOR'S THEN LET b-211 

8735 LET f*W LET 9-1 

8748 FOR «-b TO 9+b 

8758 LET «»8' LET CPS' LET 9-9-fl 

8768 IF C<«>-999 THEN GO TO 885 



8885 PRINT INK di BRIGHT li FLU 
SH l>iHT f,9iS» 

8618 iF *=L0CRTI0N THEN PRINT R 



8848 i.0 TO 8748 
8858 PRINT HT ^9;"!" 
8853 GO TO 8828 

8868 PRINT HT 17, 17i "Press ENTER 
8865 IF INKEY«."" THEN GO TO 88 



The Map takes the form of a plan view of the level that the player is 
currently on, with each room, and the walls, printed. The monsters are 
shown by dashing squares, and treasure is also shown. Thus a yellow 
square with the little treasure symbol denotes a cave with treasure, while a 
flashing green square will denote a square with a monster present. An 
empty cave is also shown — and, of course, all the combinations, as well as 
the player's position. The module doesn't really need line-by-line expla- 



usually does at a critical 



Kr. hold on a mi nil If . . . 

During combat, the phone might ring, 
moment, so we could give the player a WAIT 
suspend the action until he returns. 
6853 REM «»«» 
6068 REM URIT 
6861 REM tW 
6878 GO SUB 68 

6060 PRINT ' INK 2| BRIGHT li FLU 



Sri 1," WAITING " 
j "Press Enter to 
0896 IF INKEY»<> 

6188 IF INKEY*-" 
80 

61 U GO SUB 68 
6129 GO TO 4043 

It pays to save . . . 

In the same vein, and if the player should have to leave the game overnight, 
we can now type in the last major module, and that is the Save Game 



btay REM ********************* 
bR96 REM Sr.vE C-HME ROU T I NEE 

3588 SAVE "adventure" LINE 3688 

8518 SfiVE "SJraPhics" CODE ic363. 
i68 

<&» SAVE -screen -SCREEN* 

ijsa ijC ro 4848 

3636 uOfic "srjphics'CODE 65363.1 
68 

of, a uiiHD screen -SCREEN* 
bt.c.J t ..R0ER 8 PAPER 8: INK 6 
36.38 POKE 23653,3 
36M 46 TO 4848 



i INK 5, FLASH 8 
"" THEN GO TO 6 
' THEN GO TO 61 



Line 8630 is a POKE to ensure that all input is in upper-case (or capitals). 

And, finally, one or two little modules that we must type in to round off 
the program. The first is the Victory, or End of Game, module, which the 
program will come to if the player has successfully completed his mission, 
and hurled the Stone into the Fiery Pit: 

REM ********************* 
;~6b6 REM END OF GAME 
,361 REM ********************* 
,376 PRINT INK 2; PAPER 6; BRIG 
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7898 PRINT "The e»e is destrosed 
and the land will remain fre 
e of evil." 

7188 GO TO 6858 



The routine at 6850 is the Restart module: 

t>839 REM ******* 
6348 REM RESTART 
6641 REM ******* 

(,858 PRINT "Press ENTER to start 

6868 IF INKEY«>"" THEN GO TO 6 
868 

68,8 IF INKEY*-"" THEN GO TO 68 

78 

6888 RUN 

And now we jus( start the whole game off with: 

5 BuRDtK 0' PAPER 2- INK t>< C 
cS ■ PRINT AT 11,8," Press ENTER 
to set up dtmoeon. " 
16 PAUSE 8 
15 RANDOMIZE 

28 PRINT INK 2; BRIGHT li FLA 
Sh l.AT 18,81" 

PLEASE WAIT.SETTI 

NU UP DUNGEON 



o lines at the very end to SAVE this whole 



c^Sj. REM ********************* 
3996 REM SAVE PROGRAM TO AUTO 
RUN 

89*1 REM ********************* 
9668 SAVE "Pros" LINE 3 

9613 STOP 




Combat 

If your player lands on a location occupied by a monster you will have first 




move 1 step east. Once you are out of the combat sequence normal 
movement is achieved with the arrow keys. You can only break out of the 
combat sequence when it is your turn to attack unless you have and use a 
"TELEPORT" spell. 
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Combat with the Lich 

spells at you and your only chance is to defend yourself or run by using the 
teleport spell. When the Lich grows weak enough you will be given your 

After defeating the Lich, the Wizard's Hand that you have been car- 
rying, will disappear, to be replaced by The Eye of the Star Warrior. Your 
task now is to destroy it by hurling it into the Fiery Pit, which is situated on 
the second level of the Dungeon complex. 

SPELLS: You will find spells buried in the temple. Using a spell 

will drain you of 50 strength units. 
Wizard's When you find the Wizard's Hand you will have a 

Hand: ghostly friend who will point to the location of buried 

treasures or spells. 
Difficulty The higher you climb in the temple the faster the mon- 

Level: sters will become. 

Mind Beware of Mind Vampires. They feed on your memory 

Vampire: and you will lose the spells you have been taught. 

SAVE: To save a game type in SAVE and press enter. Start 

your recorder and press any key. The computer will 




resume where you left off. To load the saved game 
back into the computer, use LOAD"" or LOAD 
"adventure". 



143 



APPENDIX C 

The Eye of the Star Warrior 
Listing 



Throughout the listing, we have used REM statements to highlight the 
various modules. The program will not run with these left in, so crammed 
is the 48K! They are here purely for guidance, and must be ignored when 

My printer will not reproduce the defined graphics used during the 
game, so we will adopt the convention of lower-case, underlined cha- 
racters. For example, the character that will, when the program is RUN, 
become the staircase graphic, is to be found on the "k" key, and should be 
entered into the lisiing by pressing CAPS SHIFT together with the 9 key 
(thus putting the machine into graphic mode), and then the "k" key. Simi- 
larly, the "m" key will yield theUDG for the Fire Pit. and soon. When the 
program is eventually RUN, the graphic character will replace the letter in 
the listing. 
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8 BORDER 8 ; 
1 ; AT 10,0;" 



13 RBI » SET GRAPHICS ** 

2» FOk J-0 TO 7 

30 REM .. WIZARDS HAND 

H RERO b POKE USR "J."*«,b 

48 READ b POKE USR "b"+i,b 

45 REM ..MAP ROOM WITHOUT 

TREASURE 
50 READ b' POKE USR "c"*l,b 
55 REM . .MAP ROOM WITH 

TREASURE 
68 READ b POKE USR "d"+a,b 
?0 REM . . STONE WALL 
S0 READ b- POKE USR "i"+A,b 
65 REM .. PLAYER 
90 READ b- POKE USR "j"t«,b 

100 REM *STAIRS» 

110 READ b: POKE USR "k"t«,b 

120 REM «HEALING WELL* 

130 READ b^ POKE USR "V*i,b 

140 REM »FIRE PIT* 

150 READ b- POKE USR "m"+a.,b 

160 NEXT a 

1?0 DATA BIN 80081111, BIN Hill 
110. BIN liU0111.BIN 11110111, BI 
N 11011011, BIN 08111000, BIN 0,B1 
N 8,6IN 11011001 

180 DATA BIN 00011111, BIN 11111 
110, BIN 10000001, BIN 10000001, BI 
N 0.BIN 00111000, BIN 00000011, BI 
N 00011180, BIN 11001010 

1S0 DATA BIN 11111111, BIN 11100 
008, BIN 10000001, BIN 10010101, BI 
N 01108110, BIN 80018000.BIN 0000 
0011.BIN 00111110, BIN 00008810 

209 DATA BIN 11 111111, BIN 11110 
880, BIN 10088801, BIN 10801001, BI 

n e, bin imma.BiN 00081111,61 
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N 81111118, BIN 18110800 

213 DATA BIN illlllll,BIN 11100 
S.BIm 8.'810130,6IN 11011 
*il,°U< 83316800, BIN 00001111,BI 
N 81111188, BIN 80110101 

ZZ6 DHTA BIN 11111111, BIN 11110 
008, b,N 13880031 , BIN 18100881, BI 
« - 'SIN 80131000.BIN 00111111, BI 
N 08111388, BIN 18800880 

230 DATA BIN 11111111, BIN 11100 
...38, Bin 13608801, BIN 11030061,61 
61 1381 18, BIN 01000100, BIN 0811 
1111, BIN 80011880, BIN 81101181 

240 DATA BIN 80111111, BIN 11110 
830, BIN 11118111, 6IN 11110111, BI 
N 6, BIN 13333818, BIN llllllll.BI 
N 8, SIN 01101188 

260 LOAD "proa" 

273 SAVE 'idvinturt" LINE 10 



1 REM tADVENTURE 

**a Ron Cimtll 

— Tom Brld9e 1983** 
3 BORDER V> PAPER 0' INK 6' C 
L3 i PRINT AT 11,0;" Pren ENTER 
to »tt up dungeon. 
IB PAUSE 0 
15 RANDOMIZE 

20 PRINT INK 2; BRIGHT 1, FLAS 
n HAT 18,0;" 

PLEASE WAIT. SETTIN 

0 uP DUNGEON 

36 POKE 23658,8 
40 GO TO 1640 

49 REM *********************** 

50 REM CLEAR BOTTOM 8 LINES 

OF SCREEN 

51 REM *********************** 
60 GO SUB 530 

ie FOR d-14 TO 21 
60 PRINT AT 0,8;" 



119 REM m 

120 RtM Subroutine to reitore 

ditl for weiPon 9riphic* 

«-l THEN RESTORE 2968 
: «-2 THEN RESTORE 2988 
■ 1-3 OR «-4 THEN RESTORE 
MM 

168 IF 1-5 OR «-6 THEN RESTORE 
3828 

178 IF 1-7 THEN RESTORE 3848 
[ IF 1-8 THEN RESTORE 3868 
I IF 1-9 THEN RESTORE 3888 
288 IF 1-18 THEN RESTORE 3188 
218 IF i-U THEN RESTORE 3128 
228 IF 1-12 THEN RESTORE 3148 
238 IF 1-13 OR 1-16 OR 1-17 THE 
N RESTORE 3168 
248 IF 1-14 THEN RESTORE 3188 
258 IF 1-15 THEN RESTORE 3288 

268 RETURN 

269 REM **»»«»»»*»»»»**»«»»» 
278 REM Subroutine to restore 

diti for Monster top sriphics 
271 REM 1****1***********1***** 
238 IF 1-1 THEN RESTORE 3328 
2S8 IF 1-2 OR 1-4 OR 1-6 OR 1-1 
6 THEN RESTORE 3368 
388 IF 1-3 THEN RESTORE 3448 
318 IF 1-5 THEN RESTORE 3268 
328 IF 1-7 THEN RESTORE 3488 
338 IF 1-8 THEN RESTORE 3468 
348 IF 1-9 THEN RESTORE 3388 
358 IF 1-18 THEN RESTORE 3248 
368 IF 1-11 THEN RESTORE 3348 
378 IF 1-12 THEN RESTORE 3228 
388 IF 1-13 THEN RESTORE 3428 
398 IF 1-14 THEN RESTORE 3288 
488 IF 1-15 THEN RESTORE 3388 
418 RETURN 
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428 REM Subroutine to restore 
alt? for monster bottom oriPhicl 
421 REM ********************** 
438 IF 1-2 OR 1-3 OR 1-4 OR 1-6 
UR 1-7 OR 1=11 OR 1-15 OR 1-16 
THEN RESTORE 3688 
440 IF t-i THEN RESTORE 3568 
450 IF 1-5 THEN RESTORE 3540 
468 IF 1-8 THEN RESTORE 3648 
478 IF »-9 THEN RESTORE 3628 
180 IF 1-10 THEN RESTORE 3480 
490 IF 1-12 THEN RESTORE 3588 
588 IF 1-13 THEH RESTORE 3588 



325 REM PRINT STATUS TABLE 
S2S REM 1********************* 
538 IF STRENGTW-189 THEN PRINT 
PAPER 6< INK 8; BRIGHT ljflT 2, 1 
6l" MISFIT 
548 IF STRENCTH>188 AND STRENGT 



558 IF STRENGTH >258 AND STRENGT 
H<-480 THEN PRINT PAPER 4j IHK 8 
, BRIGHT ljAT 2,16;" HERO 

560 IF STRENGTH >48B AND STRENGT 
H<-508 THEN PRINT PAPER 3; INK 7 
I BRIGHT liAT 2,16i" WARRIOR 

578 IF STRENGTH>588 AND SPELL -0 
THEN PRINT PAPER 7» INK 1, BRIG 
HT 1>AT 2, 16; " SUPER HERO " 
588 IF STRENGTH<=580 THEN GO TO 
618 

598 iF SPELL>0 AND SPELL<=3 THE 
N PRINT PAPER Si INK 0; BRIGHT 1 
,HT2,16i" WIZARD " 
608 IF SPELL>3 THEN PRINT PAPER 
2; INK li BRIGHT ll FLASH liAT 



2/16l" GRAND WI2ARD " 
618 PRINT PAPER 7;AT 4,28). 

tS»™ >9 " 3 then let s 
sjf!oor INT P " PER 7 ' INK 8,1,1 6,2 

P58 IF Na0CATI0H)-8 THEN PRINT 
PAPER 4, INK 0, BRIGHT 1, AT 8,2 
6, " GREEN" 

668 IF C0MBAT>8 THEN GO TO 688 
6/8 IF N( LOCUTION X>8 THEN PRIH 

i PAPER 6; INK 1; BRIGHT li FLRS 

H lJBT 8,26;"YELL0U" 
m l!lr, COmm>e THEN PRINT INK 

e,26ro»BRr " FLnSH " nT 

^698 PRINT prper 7 , ink 3;AT 18, 

788 IF PER>8 THEN PRINT PAPER 7 
J INK 8jAT 16,29;PER 

lie PRINT PAPER 7; INK 8iflT 12, 
29, WOUNDS 

^28 IF STRENGTH<-8 THEN GO TO 7 

738 PRINT AT 13,8, ■ " 
rt8 RETURN 
758 GO SUB 78 

768 PRINT "You h.v. ditd of txh 
notion.' 

778 GO TO 6858 

779 REM HIIIIIIIIIIIIIIIIIIII 

/SB REM PRINT OUT CONTENTS OF 
ROOM 

781 REM ntntUUWtttti 
?98 LET r-T<LOCf)TION) 
^888 IF r-8 OR r-99 THEN GO TO 8 

818 IF r-18 THEN GO TO 988 

628 GO TO 848 

838 IF S< LOCATION )-8 THEN GO TO 
928 



868 PRINT T«<r> 
878 LET r»saOCATI0N> 
888 IF r-8 THEH GO TO 928 



988 PRIN" 

918 PRIN', T*<r> 

928 IF COMBAT-3 THEN GO TO 948 

925 IF M<L0CATIONX>8 THEN PRIH 
f "Th€ room i» 9uar ' 

938 IF M< LOCATION 
T B«M< LOCATION)) 

948 IF X«3,18)-"k." THEN PRINT 
'■you H* ttiirs in tht comtr." 

958 IF XK3,4)-"r THEN PRINT ' 
YOU ! 

i firt pit." 
978 RETURN 

9S8 PRINT "You hnvt found tht 9 
nostla h«nd of tht sood Hij«rd. 
It i* aouri until *ou find tht t 

998 FOR r-1 TO 12 
1888 IF H<r)-8 THEN GO TO 1828 
1818 NEXT r 
1828 LET H<r)-18 
1838 LET WHAND-1 
1848 LET T< LOCATION >-99 

1858 GO TO 928 

1859 REM ********************* 
,868 REM CHANGE TREASURE INPUT 

INTO NUMBERS 
1861 REM ********************* 
1878 DIM V*<LEN SO 
1088 FOR r-1 TO 25 
1898 LET V»-T»<r) 
Hal IF WW THEN RETURN 
1118 NEXT r 
1128 LET r-8 
1138 RETURN 



1150 LET TRE-0 

1160 FOR b-1 TO 12 

li?0 IF H<b)-r THEN GO TO 1208 

1100 NEXT b 

1190 RETURN 

1200 LET TRE-i 

1210 RETURN 

1219 REM »»ll lll ll11U |ll <mi 

1220 REM CHECK YOUR WEAPONS 

EFFECT 

1221 rem mmMtmn» 



1250 LET S«-B« I TO «*1 > 

1260 IF S«-" " THEN GO TO 1290 

1270 IF VAL S»-r THEN RETURN 

1200 NEXT i 

1290 LET r-0 

1300 RETURN 

>309 rem ********************* 

1310 rem check your defence 

1311 rem tianmmamni 

1320 LET BM»(IK LOCUTION)) 
1330 FOR «-l TO 18 STEP 2 
1340 LET S«-8«<< TO 1*1 > 
1350 IF S1-" ■ THEN GO TO 1380 
1360 IF VRL 3*T THEN RETURN 
1370 NEXT » 
1380 LET r-0 
1390 RETURN 

1299 REM ********************** 

1400 REM MIND VAMPIRE 

1401 REM ********************** 
1410 GO SUB €0 

1420 FOR r-1 TO 12 

1430 IF H(r)>18 THEN LET H<r>0 

1440 NEXT r 

1445 LET SPELL-0 

1450 PRINT "Your Bind it btlng d 
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525 IF UEAP0N>16 THEN RETURN 
530 LET r-INT <RND*90H1 
540 IF t~KUOUNDS*10MCOMBPT*10 
X90 THEN RETURN 
550 PRINT "You h*vt d«m«9ed thf 

560 PRINT Tt( WEAPON ) 
565 PAUSE 100 
570 FOR «"1 TO 12 
580 IF HU)-WEAPON THEN GO TO 1 
600 
590 NEXT < 

600 IF UEAPON-13 OR HEflPON-17 T 

IEN GO TO 1625 

605 LET H(«)-0 

610 LET HELD-HELD-1 

620 RETURN 

625 LET HU)"16 

630 RETURN 

634 REM ********************* 

635 REM SET UP DUNGEON 

b36 REM ********************* 
640 DIM C<300> 

650 FOR 1-1 TO 10' LET C<*>-999 

NEXT • 

660 FOR «-90 TO 110' LET C<«)-9 
99' NEXT * 

670 FOR «-19B TO 210' LET C<»>- 
999' NEXT i 



1698 FOR «-ll TO 291 I 
T Ct*>-999, NEXT a 
17M FOR «-18 TO 388 STEP 18° LE 
T CCD-999' NEXT 1 
4718 LET b-INT <RND*38H38 
1728 FOR »-l TO b 
1738 LET d-INT <RND*288«ie 
174B IF CCd>-999 THEN CO TO 1738 
1738 IF C(d-18>-999 OR C(cH-l>-99 



1788 NEXT < 

1798 LET d-0 

1888 FOR «-18 TO 298 

1818 IF C<«>-999 THEN GO TO 1848 

1828 LET d-dtl 

1838 LET C<«)-d 

1848 NEXT I 

1849 REN ********************* 
1858 REM PoPuLte dunstoii uith 

1831 REM ********************* 

1868 DIM M(298> 

1878 FOR »-18 TO 298 

1888 LET b-INT <RND*4»1 

1898 IF b<2 THEN GO TO 1918 

1988 LET M<«>-INT (RNOJ13H1 

1918 NEXT « 

1928 LET M<12)-8 

1938 LET «-IHT <RN0i8BH218 

1948 IF C(«)-999 THEN GO TO 1938 

1958 LET M<«)-16 

1959 REM ********************* 
1968 REM Pl«i 



1961 REM ********************* 
1978 DIM TC298) 
1988 FOR 1-18 TO 298 
1998 LET b-INT <RND*4)*1 
2888 IF b<3 THEN GO TO 2828 
2818 LET KD-INT (RHM13H1 



2828 NEXT « 

2838 REM * ADD WIZARDS HAND * 

2B48 LET j-INT (RND*78)*28 

2858 IF C<«>-999 THEN CO TO 2848 

2868 LET TCD-16 

286? REM ********************* 

2868 REM STORAGE SPACE 



2888 REM READ IN MONSTERS 
2881 REM ********************* 
2898 DIM MX 19, 15) 
2188 FOR *-l TO 19' READ M««), 



2121 REM ********************* 

2138 DIM TIC 25, 15) 

2148 FOR «"1 TO 25> READ T«U)' 

2158 DATA "SPADE", "FIRE UHIP'VS 
UORD", "SILVER SWORD" , "SILVER STA 
FF", "SAINTLY STAFF", "TALISMAN" , " 
CROSS", "SHIELD", "TORCH", "INVISIB 
LE CLOAK" , "CLUB" , "HOLY WATER", "B 
UU AND ARROWS", "MAGIC SHIELD" , "E 
MPTY BOTTLE" , "HEALING WATER", "WI 
ZARDS HAND", "TELEPORT" , "FORCESHI 
ELD", "PSYCHIC SHIELD", "LIGHTNING 

BOLT", "STONE SPELL", "LIMBO SPEL 
L" , "STONE" 

2159 REM J 



2170 Din AX16,20> 
2180 FOR «-l TO 16' READ A«c«)' 
NEXT 1 

2190 DATA "010304050607122224"," 
020718222324", "86071324", "828710 
2324" , "86071324" , "02048586101322 
2324", "028485061013222324" , "0607 
24' , "0304222324", "02040607102223 
24" , "030414222324" , "010306071213 
222324" , "02030414222324", "020304 
10222324" , "03848714222324" , "2324 



2288 REM READ IN DEFENCE 

WEAPONS AGAINST EACH 
MONSTER 

2201 REM I II II I I IIII MIII III I I 

2218 DIM D»<19,18) 

2220 FOR t-1 TO 19' READ D»U>' 

2230 DATA "0311 1519", "0209101115 
IS" , "8700151928" , "820789101 11519 
", "071319" - "02878809101 1131519", 
"820700091011131319", "0708131920 
" , "091 11519" , "028789181 1131519", 
"020918111519", "891113151928", "8 
28918111519", "020918111519", 



I 78,70,20,40,70,50,50,5 



2280 REM MONSTER COLOURS 

22si rem mtmtmtmmm* 

22S0 DIM P(16) 

2388 FOR 4-1 TO 16' READ P<»)' I- 
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I 7,7,2,3,2,5,5,7,4,2,6, 



2321 rem itmttmntmmtt 

2338 DIM U<17) 

2340 FOR t-1 TO 17' READ WU>' N 
EXT < 

2350 DATA 7,2,7,5,5,6,3,6.6,2,3, 
6,5,6,3/4,7 

2359 REM »*»»»**»»**»»***»»**» 

2360 REM SET UP STAIRS, HEALING 

UELL «r>d FIRE PIT 

2361 REM »»»»»»**»**«»»»»*»«» 
2370 LET SONE-INT <RND*S0>»10 
2300 IF C( SOME (-999 THEN GO TO 2 
370 



2410 LET STHREE-INT <RND*90H210 
2420 IF C(STHREE>-999 THEN GO TO 
2410 

2430 LET HU-INT <RND*90>*1 

2440 IF KHIO-999 THEN GO TO 243 



2470 LET FLOOR-1' LET L0CAT10N-1 
2' LET PX-6' LET PY-6' LET STREN 
GTH-100' LET COMBAT-0' LET SPELL 
-0. LET PER-0' LET UOUHDS-8' LET 
SH-0'LET HELD-O' LET RET-8' LE 
T hHAND-0' LET STONE-8 
2473 DIM H<12> 
2488 DIM XK12.12) 
2490 FOR 4-0 TO 12' PRINT PAPER 
il INK IjAT »<«!" 

"' NEXT < 
2500 PRINT " 



2518 PRINT PAPER ll INK 5) AT 0,1 
9J "ADVENTURE" 



2520 PRINT PAPER 1, INK 7;AT 
91 "STRENGTH 

2538 PRINT PAPER li INK 7iAT 6.2 
2j "FLOOR 

2348 PRINT PAPER lj INK ?|AT 8,1 
4,: "STATUS MODE 

2558 PRINT PAPER li INK 7; AT 18, 
14, COMBAT RATING 
2568 PRINT PAPER li INK 7iAT 12, 
■it 1 WOUNDS 

2578 REM SET UP AND PRINT 

GRAPHICS OF ROOM 
2571 REM ****»****»«**»**»«» 
2588 LET XX 1,1 TO 12)-' 

2598 LET XX 2,1 TO 12)-" iiiiiii 
111 " 

2600 FOR «-3 TO 18 

2610 LET XX., 1 TO 12)-" _1_ 

2628 NEXT a 

2638 LET XX 11,1 TO 12)-" illili 
1111 • 

2648 LET X« 12, 1 TO 12)-" 

2658 IF C<L0CATI0N-18)<>999 THEN 

LET XX2,6 TO 7)-" " 
2668 IF CaOCRT I ON+ 18)0999 THEN 

LET XX 11,6 TO 7)-" " 
2678 IF C<L0CATION-l)<>999 THEN 
LET X«6,2>"" " 

2690 IF C<L0CATI0N-1X>999 THEN 
LET XX7,2)-" " 

2690 IF CtLOCATION+1 )<>999 THEN 
LET X»<6,11)-" " 
2708 IF C<L0CATION*l)<>999 THEN 
LET X»C7, 11)-" " 

2710 IF SONE-LOCATION OR STWO-LO 
CATION OR S THREE "LOCATION THEN L 
ET XX3,I8)-"k" 

2728 IF HU-LOCATION THEN LET XX 
3,4>."_T 
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2/40 LET i 
2750 IF a< 
-2790 

2760 GO SUB 130 

2778 FOR a-8 TO ?• READ b' POKE 

USR 'o;'*«,b' NEXT 1 

2708 IF RET-1 THEN RETURN 

2790 LET a-SCLOCRTION) 

2880 IF a-0 THEN GO TO 2838 

2810 GO SUB 138 

2828 FOR .-0 TO 7' READ b' POKE 

USR X'tbb' NEXT a 

2830 IF RET-1 THEN RETURN 

2840 LET a-M< LOCATION) 

2850 IF a-0 THEN GO TO 3660 

„6B CO SUB 280 

2870 FOR *-0 TO 7 

2880 READ b< POKE USR "<r+a,b 

2S90 READ b POKE USR "u"*a,b 

2900 NEXT a 

2918 LET a-M(LOCATION)' GO SUB 0 



2940 READ b, POKE USR "V'*a,b 

2950 NEXT a 

2960 REM MSPADE** 

2970 DATA BIN 00000101, BIN 00000 

810, BIN 08000101, BIN 01001000, BI 

N 81110088, BIN 011 10000, BIN 0111 

1000, BIN 0 

2980 REM MFIRE UHIP** 
2990 DATA BIN 0,BIN 00000111, BIN 
10801811, BIN 10001011, BIN 10001 
011, BIN 10010011, BIN 11100011, BI 
N 0 

3088 REM nSHORDl* 

S018 DATA BIN 00001001, BIN 00000 

110, BIN 00000110, BIN 00001001, BI 

N 00010000, BIN 00100080, BIN 8100 

0000, BIN 10000000 

3820 REM **STAFF** 



n aeaeiee0,BiN 0aei8eee,BiN eaio 
aeaa.aiN eiaeaaae 

3848 REM **THLISMHN** 
3858 MTU BIN 80811888, BIN 81188 
Ha, BIN 18188181, BIN 18011881, BI 
N 10811081, BIN 10100101, BIN 0110 
alia, BIN 80811880 
3860 REM **CROSS*« 
3070 WITH BIN 00111100, BIN 11188 
111, BIN 18008881, BIN 11180111, BI 
I, BIN 00180100, BIN 0010 
BIN 08111188 



llie.BIN 80011008 
Jiee REM **TORCH» 
3118 WITH BIN 00110111, BIN 01101 
111, BIN 11011118, BIN 11 111118, BI 
N 11111888, BIN 10001000, BIN 1001 



N 01000018, BIN 01800010, BIN 0110 
0118, BIN 80111188 
3148 REM **CIUBM 
3150 WITH BIN 00088811, BIN 00800 
111, BIN 88001110,BIN 80111188,81 
N 81111880, BIN 11U1000,BIN 1111 
0000,BIN 11110008 
3168 REM «H01Y WHTER+BOTTLE** 
3170 DHTH BIN 8, BIN 80811000, BIN 
08811888, BIN 0001 1008, BIN 00111 
108, BIN 01111110, BIN 01111110, BI 
N 80111100 

3180 REM **B0U 4 HRROUS** 
3130 DHTH BIN 81111188,BIN 01081 
U8.BIN 00100111, BIN 00010811, BI 
N 01801001, BIN 88180101, BIN 0881 

0811, BIN -— 
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32BB KEM »ENCHHNTED SHIELD** 
3218 DHTH BIN 00111100, BIN 01111 
118,B1N 01000010,BIN 8101 1810, BI 
N ai811810,BIN 01000010.BIN 0111 
1118, BIN 08111100 
3228 REM **SHNDMRN TOP** 
3230 DHTH BIN 0,BIN 8, BIN 088880 
11, BIN 11888888, BIN 00000111 , BIN 
11188880, BIN 00001101, BIN 10110 
008, BIN 80111111, BIN 11111100, BI 
N 01111110, BIN 01111110, BIN 1100 
1188, BIN 88110811, BIN 11001111, B 
IN 11110011 

3248 REM **»IEREUOLF TOP** 
3250 WITH BIN 80088081, BIN 0,BIN 
8038081 1 , BIN 18000000.BIN 00801 
,11, BIN 10000088.BIN 88800001, BI 
N 100a0000.BIN 00000111, BIN 1110 
80B0.BIN 00001081.BIN 10010000, B 
IH 00818881, BIN 18001088.BIN 000 
10001, BIN 10001000 
3268 REM WIRE ELEMENTAL TOP** 
3278 DHTH BIN 00101101, BIN 00818 
880, BIN 10100011, BIN 10100000, BI 

n 18810111, bin ni0iiea.BIN 0100 

11 11, BIN 11181001.BIN 01011101, B 
IN 18U0001.BIN 00111111, BIN 111 
110ie.BIN 00111110, BIN 01111100, 
BIN 80111108, BIN 80111180 
3280 REM **CIHNT SERPENT TOP** 
3230 WITH BIN 8, BIN 8, BIN 088888 
81, BIN 10000000, BIN 00088881, BIN 

11 100000, BIN 00000001, BIN 11110 
000, BIN 00080811, BIN 18000000, BI 
N 00008111, BIN 0,BIN 00001110, BI 
N 0,BIN 00011111, BIN 11111000 
3388 REM **DRHGON TOP** 
3318 WITH BIN 0,BIN 0.BIN 0,BIN 
8, BIN 00000001, BIN 10080000, BIN 
08888011, BIN 11000000, BIN 100011 
10, BIN 11000001, BIN 11881111, BIN 

11000081, BIN 11 100001, BIN 11000 
811, BIN 11110881, BIN 11000111 



3320 REM MSKELETON TOP** 

333a arm bin a, sin a, bin a. bin 
a. bin 00800001, bin 11008000, bin 
00008881, bin 1U0M00.IW eeeeee 
ai,BiN 11000000, bin a, bin leaeee 
1011, bin uieaeaa.BiN 



iei.BIN laeaa 
in, bin naaaeaa 

3368 REM MMUMMY.ZOMBIE, VAMPIRE, 
LICH TOP** 

3370 DBTH BIN a. BIN 8, BIN a. BIN 
00000011, BIN U00NN.BIH 00B8BB 

ii, bin naaaaaa,BiN aaeaaaii,BiN 
uaaaaaa.BIN 30000001, bin laaaa 
eea,BiN aaaeaan,BiN uaaaaee 

33BB REM XtBRLROG TOP** 

3390 DATA BIN 80888810, BIN 81888 

aaa,BiN aaaaaaia.BiN 01008800, bi 
n aaeeeaia.BiN aiaaeaaa.BiN aaaa 
■an, bin iiaaaeae.BIN obbbbbh.b 
in 11000000, bin 00000811, bin 118 



iai.BIN 1 

1811, BIN 11088008 
3400 REN (WIND VAMPIRE TOP** 
3410 OATH BIN 00888801, BIN 18808 
800. BIN 00088811, BIN 11808088, BI 
N 000881 11, BIN 11 188008, BIN 8000 
1101, BIN 101 10000, BIN 80000111, B 
IN 11100000, BIN 80008811, BIN 118 
00000, BIN 00000001, BIN 10888880, 
BIN 00000011, BIN 11800008 
3420 REM WHARPIE TOP** 
3430 OATH BIN 8, BIN 8, BIN 8, BIN 
00008010, BIN 01000001 < BIN 108001 
10, BIN 01 100011, BIN 11800111, BIN 
01110011, BIN 11081110, BIN 01110 



162 



N 13011110, BIN 01111111, BIN 1111 
1110 

3440 REM **DEMON TOP** 
3450 SflTA BIN 00000010.BIN 01000 
000, BIN 00000011, BIN 11000010, BI 
r, 8, 883018, BIN 01000110.BIN 0110 
9811, BIN 11800111, BIN 01110011, B 
iN 11001110, BIN 01110011, BIN 110 
01111, BIN 01111001, BIN 10011110, 
BIN 01111111, BIN 11111110 
J460 REM HRfllTH TOP** 
34?0 DflTH BIN 0.BIN 0.BIN 000008 
81, BIN 18800080.BIN 00000011.BIN 
11800000, BIN 11000111, BIN 11100 
011, BIN 11 101101 , BIN 10110011, BI 



■■^■■■V™ ,1111011. 



Bin ■ 



3480 REM ttNEREUOLF BOTTOM** 
3490 DATA BIN 00010001.BIN 10001 
000, BIN 00000010.BIN 01000000,81 



1000, BIN 00010000, BIN 00001008,6 
in 00010008, BIN 00001080, BIN 000 
..JBB.J.BIN 08011008, BIN 00011000, 
BIN 0,BIN 0 

J500 REM MSANDMAN BOTTOM** 
3510 DATA BIN 00001111, BIN 11110 
000,B1N 00001100,BIN 00110008,BI 
N 00011088, BIN 00011000, BIN 0011 
8000, BIN 00801100, BIN 00110080,6 
IN 00001100, 6IN 00110000.BIN 000 
01100.BIN 01110000, BIN 00001110, 
BIN 8, BIN 0 

351:0 REM **GIRNT SERPENT BOTTOM* 

3530 DRTR BIN 00011 111, BIN Hill 
000, BIN 00110000, BIN 0,6IN 00111 
111, BIN 11111180, BIN 08111111, BI 
N 11111108, BIN 01100000, BIN 0,BI 
N Blllllll.BIN lllllllB.BIN 0111 
1111, BIN 11111110,BIN 0.BIN 0 



3540 REM **FIRE ELEMENTAL BOTTOM 

3550 DATA BIH 18011110, BIN 01110 
100, BIN 10111111, BIN 11111001, BI 
N 01110000, BIN 11101101, BIN 0011 
0010, BIN 11001110, BIN 01100100, B 
IN 00001100, SIN 01111000, BIN 001 
00110, BIN 01100000, BIN 00011110, 
BIN 11 100000, BIN 00000111 
3560 REM **SKELETON BOTTOM** 
3370 DATA BIN 00001000, BIN 10001 

000, BIN 00010011.BIN 11100100, BI 
N 00000001.BIN 01000000.BIN 0000 

0001, BIN 01000000.BIN 00000001,6 
IN 01000000, BIN 00000001, BIN 010 
00000.BIN 00060001, BIN 01000000, 
BIN 00000011, BIN 01100000 

3588 REM **HARPIE BOTTOM** 
3590 DATA BIN 01111011, BIN 11011 
110.BIN 01110101.BIN 10101110.BI 
N 01101101.BIN 10110110,BIN 0111 

i10i.bin i6imi0,8iN auiieia.B 

IN 01011110, BIN 01110100, BIN 001 

00110, BIN 81108100, BIN 00100010, 
BIN 81001100, BIN 00110000 

3660 REM **CVCLOPS*MUMMY*Z0MBIE* 
VAMP1RE*BALR0G*MIND VAMPIRE*LICH 
BOTTOM** 

3610 DftTfl BIN 00000101, BIN 10100 
000.BIN 0600ieei.BIN 10610006,BI 
N 00610001, BIN 10061600, BIN 0688 
8001, BIN 10000600, BIN 00868810, B 
IN 61888668, BIN 88008166, BIN 681 
66000.BIN 66006100, BIN 00100000, 
BIN 00001 100, BIN 00110888 
3628 REM WJRBGON BOTTOM* 
3638 DATA BIN 11111681, BIN 11661 

111, BIN 11111101, BIN 11611111,61 
N 11111111, 6IN llUUll.BIN 1111 
1181, BIN 11811111, BIN 11111881, B 
IN 11861111, BIN 11110001, BIN 106 
661 11, BIN 11068610, BIN 0000001 1 
BIN 10011100,BIN — " 
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«« C The Eye of Ihe Star Warrioi 



1 *URAITH BOTTOM* 
.38 DATA BIN 00001 111, BIN 11110 
i3, BIN 00011111 , BIN 11100000,61 
0011111 1,BIN 11000000, BIN 0111 
11, BIN 10080068, BIN 81111188, B 
I 8, BIN 61110880, BIN 0,BIN 6118 



3668 LET WSC-8' LET WFC=6' LET M 
C-0 : LET LET SX«! ■ LET HX= 

i- LET HVXli LET MV8, LET MX=6' 
lET PER«8 LET BY>8' LET BX»8 
3667 REM ******************* 
3666 REM PLBCE OBJECTS IN NEW 
ROOM. 

3670 IF T<LOCATIONX1 OR TCLOCAT 

ION)>17 THEN 00 TO 3710 

36B0 LET wX-INT <RND*5)+4> LET W 

3630 LET XWW^WX)*'^' 
3700 LET UFC-U<T<LOCATION>> 
3710 IF S<L0CRTI0NX1 THEN CO TO 

3760 

3720 LET SX-INT CRND*5)+4 LET S 
r-INT ( RND*5 )+4 

3(36 IF SX-UX AND SY-U'r THEN GO 
TO 3726 

3748 LET X»<SV.SX)-"P" 



3776 IF T( LOCATION >=0 THEN LET B 
f-INT <RND*5>+4 

3786 IF T(LOCRTION)-0 THEN LET B 
X"iNT CRND*.5>+4 

3756 IF X»CBY,BXX>" " THEN GO T 
0 3760 

3600 IF M( LOCATION XI THEN GO TO 
3820 

3810 LET MC»P(M<LOCATION>> 

3828 PRINT RT 6,0i" " 

3638 FOR «-l TO 12 

3840 PRINT TAB llXXt.l TO 12> 



3860 PRINT PAPER 0, INK 4; BRIGH 
I ljflT 12.3;"R0OM ";C<LOCRTION>; 



3830 PRINT INK WSC; BRIGHT 1;RT 

3390 iF~HW=LOCP,TION THEN PRINT I 
NK 5;fll 3.4; "V; 

3900 IF FP-LOCHTION THEN PRINT I 
NK 2; PAPER 6; BRIGHT 1; FLASH 1 

;HT 3,4; "J." 

*>»» «WI »* S'^T PY,PX;"J" 
3920 IF T<LOCP,TION>=0 HND UHAND= 
1 THEN PRINT INK 4; BRIGHT HPT 
Bf,3X-2;"«.b" 

3930 IF ntCOCflTIONXI THEN GO TO 

3940 LET MY-6< LET MX=6 

334D LET PER«V(MCLOCflTION>> 

3950 LET PER-PER-<klOUNDS*5> 

3960 IF PER<0 THEN LET PER-0 

3970 IF PERH00 THEN LET PER-100 

3330 PRINT INK MC; BRIGHT 1;AT M 

Y,HXj"QU"jHT t1Y^■l,M><; l, RT , ' 

3930 GO~3UB 60 

4800 GO SUB 790 

4010 GO SUB 530 

4019 REN ********************* 

4028 REM INPUT YOUR COI1MBND 

4021 REM ********************* 

4030 LET «-0 

4040 DIM BX32) . 

4050 LET RET-0 

4060 LET COM6P.T-0 

4070 LET k-0 

4080 LET S«-INKEY* 

4090 IF CODE 3>-12 OR CODE S«»48 

4090 IF CODE S«-12 OR CODE S*=48 
4080M.ET S>-INKEY< 
4090 IF CODE S«-12 OR CODE S>=48 
THEN GO TO 4230 
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St=13 THEN GO TO 42 

,0 

4110 i-ET a=a+l 

4120 IF a>=68^FL00R THEN GO TO 4 

4130 IF 3*="' THEN GO TO 4080 
4140 iF 3S= '5' 1 OR SS= !! 6" OR S*=" 
r iM s»- 8" THEN GO TO 4400 
4,50 IF k>»31 THEN GO TO 4080 
4160 LET k=k*i 

«170 LET 3s<k>=S« LET BKk+l>«" 

> 

4130 PRINT AT 21,0;B»: BEEP 0.1, 
20 

4.3.J L ET a=3.+1 

4200 IF a>=60/FLOOR THEN GO TO 4 
930 

4210 IF INKEYSO"' THEN GO TO 41 



443* IF K<1 THEN GO TO 4080 
4240 lET BKk >-">": LET B«k+1>- 



4260 GO TO 4180 
44?. i GO SUB 60 

4280 IF B«( TO 4>."TflKE- THEN GO 
TO 5120 

4233 IF BKU-'I" THEN GO TO 544 
0 

4300 IF m TO 4>-"DROP' THEN GO 
10 5530 

4310 IF BSt TO 4)="WPIT" THEN GO 
TO 6070 

4320 iF B*< TO 4>*"L0OK" THEN GO 
TO 4850 

4330 IF B»< TO 3)-"DIG" THEN GO 
iO 6290 

4340 IF BSC TO 5)-" DRINK" THEN G 

4350 IF m TO 2>="UP" OR B>< TO 
4)= MM- THEN GO TO 6140 



4840 LOOK COMMAND 

4841 REM **************** **** i 
4358 GO SUB 60 

4868 GO SUB 798 

4873 IF C0KSAO8 THEN GO TO 489 
48o0' OC TO 4040 

48.-0 If COMBflT-3 THEN PRINT "Th 
• Uer> is ItUcklM sou with «"J 
M*:rv LOCATION)) 
4300 PAUSE 380 

4905 IF CQMBAT=1 THEN GO TO 714 
4910 IF C0MBAT-2 THEN GO TO 761 



4520 REM MONSTER MOVEMENT 

Z'i ™l i'" lET TX-MX 
4S35 LET I.-0 

4940 IF PY<TY THEN LET TY=TY-1 
4950 IF FY>TY THEN LET TY-TY-.1 
4960 IF PX>TX THEN LET TX=TX+1 
49/0 IF PX<TX THEN LET TX-TX-1 
4980 IF TY<3 OR TY>9 OR TX<3 OR 
TX>9 THEN GO TO 4030 
4990 PRINT AT MY*MX;XS<MY,MX);AT 

5080 rEI,- Hi r,,' + l..MXiX«(MT + l.MX 

>mi m+i,MX+iiX»<My»i,MX*i) 

5010 PRINT INK UFO/AT UY,UX;X« 
In, NX) 

5020 PRINT INK USCiBT 3Y,SX;XS< 
SY,SX) 

5330 IF ^-LOCATION THEN PRINT 

INK 5>HT 3,4) 
5840 IF FP-LOCATION THEN PRINT 

INK 2i PAPER 6/ BRIGHT li FLASH 

5050 If't<LXATION)=0 AND WHAND= 
1 THEN PRINT INK 4i BRIGHT liA 
1 Di,BX-2i"«b" 
5068 PRINT AT rt.WX>"£ 
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; AND MX=PX OR MY=I 
OR MV+l-PV AND MX: 
AND riX+l=PX THEN 



tj83 .-Er c ********************* 

51 10 REM TAKE OBJECT 

5111 REM ********************* 
0128 IF X«PY,PX)<>"1" THEN GO 

5138 FOR r*l TO 12 

3148 IF H<r)=16 THEN GO TO 5170 

5150 NEXT r 

5160 PRINT "You need «n empty bo 
ttl« to collect water from t 
re realms well.": GO TO 4340 
5170 lET H(r>-17 

5130 PRINT "You have collected a 
bottle fullof healina water." 
5190 GO TO 4043 

5280 IF X«PY,PX>-"0" OR X»<PY,P 



;.22« Go TO 4840 

0230 ir HELD45 THEN GO TO 5260 
5240 PRINT Sorry ; you cannot ca 

::l58 oO TO 4040 

5260 FOR r=l TO 12 

5c 70 IF H(r>.0 THEN GO TO 5300 

:l?0 00 TO 5240 

5303 IF X»<PY,PX)«"oJ THEN LET 

ti<r)=T( LOCATION) 

5313 IF XS<FY,PX)» ;: P I: THEN LET 

n(r)-3l LOCATION) 

5328 PRINT "You have picked up:" 

:33a IF X«(PY,PX)="o" THEN PRIN 

t r»c KlOcation)) 



5348 IF XKPYiPXJ-f THEN PRIN 

T T*(S<LOCRTION>> 

5359 LET HELOHELD-H 

5368 IF X«PY.PX)-"o; THEN LET 

KL0CfTTI0N>»33 

5378 IF X«PY,PX>""P" THEN LET 

3< UJCR7 ION>=0 

5386 LET X»(PY,PX>=" " 

5398 LEI r-INT (RNM2S8H1 

5488 IF C(r>=399 OR T(r>«18 THEN 

GO TO 5398 
5418 LET T<r>=INT (RNW15H1 
5428 SO TO 4848 
54/9 REM ****** 
5438 REM INVENT 
5431 REM ****** 
5448 GO SUB 68 
5458 LET d-13' LEi r=8 



5438 ^ET d-d-M 
. 430 If d-28 THEN LET r»17 
5588 if 3=28 THEN LET d-14 
5518 PRINT AT d,riT«H<b>> 
5528 NEXT b 

553B IF COMBAT >3 THEN GO TO 355 
6 

5548 GO TO 4848 
5558 PriuSE 500 

5569 IF COMBBT-1 THEN GO TO 714 
5578 IF COMBHT-2 THEN GO TO 761 

5575 IF COMBRT-3 THEN GO TO 889 

0 

5573 REM **** 
;.S38 REM DSOF 
55S1 REM **** 
5538 lET RET=1 

5608 IF PY=2 OR PY=11 OR PX«2 OR 

PX-11 THEN GO TO 5628 
5618 GO TO 5648 

5628 FfINT "You cannot drop obJe 
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5630 GO TO 4840 

5640 LET B«k+1>" 

5658 LET SS.-BK6 TO 28 > 

5668 FOR r-i TO 22 

5678 IF St-T$(r) THEN GO TO 571 

8 

5638 NEXT r 

5630 FRINT " I don't understand w 

5788 GO TO 4048 
5718 IF r<13 THEN GO TO 5788 
5728 IF r<>18 OR r<>25 THEN GO 
TO 5768 

5738 PRINT "You cannot drop the" 
5740 PRINT T*Cr> 
5758 GO TO 4848 

5760 PRINT "You cannot drop some 
thin? that exists in your memor 

5778 GO TO 4848 

5788 FOR b«l TO 12 

5738 IF H<b)=r THEN GO TO 5838 

5388 NEXT b 

5818 PRiNT "You cannot drop some 
thing you do not carry." 
5828 GO TO 4040 

5840 if 3( LOCUTION )-8 OR T( LOCHT 
IUNJ-3S THEN GO TO 5878 
5850 PRINT 'Invisible In carry 
off the treasure you have ju 
St oroFPed. " 
5660 GO TO 6049 

5378 IF S<L0CflT10N)-8 THEN GO T 
0 5838 

5338 GO TO 5368 

5338 LET S( LOCATION >»r 

5338 GO 3UB 2738 

5318 LET SX=INT ( RND*5 >+4 ■ LET S 

Y-iNT <RNC*5)*4 

5328 iF X»(3Y,SX><>" " THEN GO 
10 5319 

5533 lET ,*3Y,3X>-"P"> LET NSC= 



=948 PRIST INK IB0> BRIGHT 1 ; RT 

ii,SX;X»<3r,Ss) 
jJo-J 50 TO 6328 
3968 LET T( LOCATION )=r 

j370 as sua 2748 

5338 LET igY-INT <RND*5>»4* LET U 
X-INT <RND*5)*4 

3998 IF X»<l»Y,UXX> :l ,: THEN Go 
TO 5338 

M LET >Mm,m*"£> LET kiFC- 

art 

6*10 PRINT INK NFC; BRIGHT ljfiT 

« UY.N'X) 
6820 PRINT RT PY,PX;"i." 
6833 IF M<LOCATION>O0 THEN PRI 
NT INK P<N< LOCATION)); BRIGHT 1 
ifiT t1Y,MXi"qu">AT MY<-l,MX;"rt" 
6040 LET HELD-HELD-1 
1-858 GO TO 4838 
1,853 REM «» 
6868 REM HA IT 
6861 REM «*» 

bWdti rfiini 
3H WAIT 



BRIGHT 1) FLA 
INK 5 1 FLASH 8 
IttiTHW" 



6090 IF INKEY*< >"" THEN GO TO 6 
838 

6i88 IF INKEY*-"" THEN GO TO 61 



6118 GO SUB 68 
6128 GO TO 4848 
6123 REM < 



6138 REM ClIMB STAIRS 

6148 IF X*<PY,FX>= : ;k" THEN GO T 

,158 PRINT "You. can't do thj.t — 
■ton must find the stairway." 
6168 GO TO 4048 

61?8 IF 6»< TO 2>."IJP" AND LOCAT 
ION-S THREE THEN GO TO 6268 



6288 IF B«< TO 2>-"UP" AND LOCAT 
I0N-30NE THEN LET LOCATION-3TU0 
6218 IF B»< TO 4>-"D0UN" AND LOC 
AT10N-STW0 THEN LET LOCATION-SO 
HE 

6228 IF B« TO 4)-"D0UN" AND LOC 
AT10N-STHREE THEN LET LOCATION- 
STUO 

6238 IF B»< TO 2>-"UP" THEN LET 
. FLOOR-FLOOR* 1 

6248 IF B* TO 4>-"D0UN" THEN L 
ET FLOOR-FLOOR-1 
6258 GO TO 2588 

6268 PRINT "You can't 90 that ua 

6278 GO TO 4848 

6273 REM tO 

6268 REM DIG 

6281 REM *** 

6298 FOR r-1 TO 12 

6388 IF H<r)-l THEN GO TO 6340 

6310 NEXT r 

b320 PRINT "You will need I. SPad 
6330 GO TO 4040 

6340 IF BY-PY AND BX-PX THEN GO 
TO 6370 

6358 PRINT "There is nothlYYi bur 
6360 GO TO 4048 

6378 IF UHRND-1 THEN GO TO 6400 
6330 PRINT "You won't find burie 
d treasure without the Wizards 

6330 GO TO 4848 
6480 LET r-INT <RND*4>+1 
6418 PRINT AT BY,BX-2|X»< BY.BX-2 
)|X« BY.BX-l) 
6428 GO SUB 60 



6440 IF r<*2 THEN LET b=INT < 
D*15»l 

6458 IF b>13 THEN GO TO ( 
6468 LET T<LOCBTION)=b 
6470 PRINT "You have founc 

6460 LET HY-BY' LET UX=BX 
6498 LET BY=0: LET BX=0 
6508 LET RET-1 



6530 LET WFC-Wat LOCATION)) 
6540 GO TO 4040 

6550 PRINT "You can now use »•" 
6560 PRINT T«<b> 
6570 LET TCLOCATI0N)-99 
6580 LET d"INT <RND*230>*1 
6590 IF T<d>-0 OR C<d>-999 THEN 
GO TO 6580 
6688 LET T<d>-0 
6610 LET BY*0: LET 6**8 
6628 FOR r-1 TO 12 
6630 IF H<r)»b THEN GO TO 4040 
6640 NEXT r 
6658 FOR r-1 TO 12 
6668 IF H(r>-0 THEN GO TO 6688 
6670 NEXT r 
6668 LET HCr)-b 
6690 LET 3PELL-SPELL*1 
6700 GO TO 4040 

6709 REM ******** 

6710 REM TELEPORT 

6711 REM ******** 
d728 GO 306 60 
6?30 FOR d-1 TO 12 

6,"40 IF H(d)"19 THEN GO TO 6780 
6750 NEXT d 

6760 PRINT "You don't know that 



LET PX-3. 
68:0 lEV S7-=r.:r~;"RENGTH-50 
;o23 GO SOB 530 
6630 GO TO 2580 

6348 REM RESTART 
63<-l REM ******* 
6658 PRINT "Press ENTER to start 

6368 IF INKEY«0"" THEN GO TO 6 
660 

6670 IF INKEY«-"" THEN GO TO 68 
,'0 

68B0 RUN 



IF H(r>-=17 THEN GO TO 6930 
NEXT r 

FOR r=l TO 12 

IF H(r)=13 THEN GO TO 7030 
NEXT r 

PRINT "You can't drink when 



6933 LET H(r>-16 
7000 GO SUB 60 

7010 PRINT "You drink a bottle o 
f healin9 water." 

828 GO TO 4040 
. 838 LET bMI 
^843 PRINT "You drink a bottle o 
f holy water" 

8bo GO TO 4840 

7859 REM ********************* 

7060 REM END OF GPiME 

7061 REM ********************* 
7870 PRINT INK 2i PAPER 0J BRIG 
HT U FLASH IjHT PY.PXi" " 

7080 GO SUB 68 



r of evil. " 

7188 GO TO mse 

7189 REM ***»*»»***«*»«***» 
7118 REM COMBAT ATTACK ROUTINE 



7138 IF MC LOCATION 5*16 THEN GO 
TO 8858 

7148 LET COMBAT-1 1 CO SUB 38 
7138 PRINT "Choose i ut.pon «tid 
«tt«ck." 

7168 IF INKEV«>"" THEN GO TO 7 



7188 IF 8t-"U" OR S«-"S" OR S1-" 
N" OR St-"E" THEN GO TO 4488 
7198 IF S»-"I" OR St- 1 INVENT" TH 
EN GO TO 3448 

7288 IF St-"LOOK" THEN GO TO 43 
58 

7218 IF LEN Sl>32 THEN GO TO 72 
38 

7228 PRINT INK 5; BRIGHT 1|S« 

7238 GO SUB 1878 

7248 IF r>8 THEN GO TO 7278 

7258 GO SUB 1478 

7268 GO TO 7158 

7278 GO SUB 1138 

7288 IF TRE-1 THEN GO TO 7318 

7298 PRINT "You don't h4ve th.t 

we*pon. " 

7388 GO TO 7618 

7318 IF St-"TELEPORT" THEN GO T 
U 6728 

7328 LET STRENGTH-STRENGTH-< NOUN 
DS41) 

7338 IF r>18 THEN LET STRENGTH- 

8TRENGTH-49 

7348 LET k€flPON-r 

7338 GO SUB 1238 
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7o78 PRINT "Your- weapon is usele 
ss against 

7388 =5INT 'the "ll-KPX LOCATION) 



-r^r.T nf i-'LjOH^lOMj' 
7448 LET PER=PER*18 
7458 IF PER>188 THEN LET PER-18 
£i 

7-:". GO SUB 1528 
, *66 GO TO 7618 

?478 IF M(L0CATI0N)=16 THEN GO 
TO 3218 

7475 PRINT "Yo'J. hive destroyed t 

,4o3 PRINT M«<H<L0CATI0N>> 

,4bi GO SU6 1528 

,430 LET M< LOCATION )=6 

75.18 PRINT PT MY,MXiXt(MY,M10jXt 

tin, MM) 

,31ii PRINT AT BY*l,MXiX»<MY*l.MX 

>i»R.lttl,l«41) 

7.328 PRINT AT PV.PXl'j; 

:..--> PAUSE 188 
7548 LET STRENGTH-STRENGTH+f IBS- 



LET l«-fl' LET P«( 



7630 IF M< LOCATION )=7 THEN GO S 
U6 1410 

7640 PRINT "You are under attack 
choose sour-defence." 
7650 IF INKEY»<>" THEN GO TO 7 

7660 INPUT 3* 

7670 IF 3«-"r OR S»="INVENT" TH 
EN GO TO 5440 

7688 IF 3»«"L00K" THEN GO TO 48 



7710 IF LEN S*>32 THEN GO TO 77 
30 

7720 PRINT INK 5; BRIGHT ljS» 

7738 GO s.jB 1070 

7740 IF r>0 THEN GO TO 7770 

; 58 GO SUB 1470 

.'760 GO TO 7640 

(77a GO SUB 1150 

7780 IF TRE-1 THEN GO TO 7820 

7730 PRINT "Von car* use that. " 

7808 IF COMBAT-3 THEN GO TO 803 

0 

7810 GO TO 7980 

7B28 IF S»-"TELEPORT- THEN GO T 
0 6720 

7830 LET WEHPON=r 

7840 LET STRENGTH.3TRENGTH-U+UO 

JNDS) 

7858 IF r>18 THEN LET STRENGTH 3 
STRENGTH-49 
7868 GO SUB 1328 
7870 IF r>0 THEN GO TO 7928 
7880 PRINT -Your defence did not 
Protect you" 
7838 GO SUB 1528 

7988 IF COMBHT-3 THEN GO TO 883 



7S38 GO SUB 1528 



7950 IF C0flBBT»3 THEN GO TO 312 

7368 GO TO 7140 

7-t3 PEP. ********************* 

73.0 p;EM MONSTER KILLS YOU 

,37. REM ********************* 

753a IF W0UNDS>*3 THEN GO TO 80 

30 

7398 FRINT "You have Deen uounde 



8043 REM ***:M:.:.*J<'m*=*«** 
8858 REM COMBAT WITH LICH 

REM ********************* 
3860 LET lICH=INT < RND*200 >+500 
bBf9 ^EI COBBHT-3 
8088 cET SP=INT (RNMS3W17 
8838 GO SUB 60 

3108 PRINT "The Lich attacks. Pr 
otecr. aour- self from a "iMXip) 
8105 LET KLOCflTI0N)-sp 



I IF LICH7-58 THEN GO TO 808 

8148 LET M<L0CATI0N>«16 
b.58 cET FER-20 

H160 PRINT ;! Tr,~ Lich m= exnaust 



81S8 GO TO 7140 
8199 SEtl ! 



&£W PPM lICH'S DEATH 



S218 PRINT "The Lich is dead, Yo 
k have won the ma9ic stone- Eye 
of tne Starwarrior. Now you. mus 
i DESTROY it. The hand of the 
iirard vanishes. Its Job is 



o^bti .... 70 7498 

£483 REn pPF*:o:pffM(t f .TTTt:<« 

»S« RBi SAVE (WE ROUTINE 

3491 REM ******:rYj*YY:M:7:M*i:7. 

3503 SAVE 'adventure" LINE 8603 

8518 3RVE "9r.«pmcs" CODE S33S3- 
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tam SAVE "screen "SCREEN* 
i;;33 GO TO 4848 

8680 LORD "9raphics !, C0DE 65368.1 

3613 LORD "screen"SCREEN» 
6e23 DijRitR 3 PRFEE 8i INK 6 
8633 POKE 23658,3 
3648 GO TO 4848 



3701 REM *** 

3718 IF FLOGR-1 THEN LET b=ll 

3728 IF RLOOR'2 THEN LET b-111 

8738 IF FL00R-3 THEN LET b=211 

8735 lET f-14' LET 9-1 

8740 FOR a=b TO 9+b 

8P50 LET e-8' LET d«6' LET 9=9+1 

3768 iF 0<a>=993 THEN CO TO 3S3 

8778 IF S(aX>8 THEN LET d-4 

8788 IF K|X>8 THEN LET e=l 

8.-30 LET 3M"C 

3803 IF S(a}>0 OR T(.;X>33 THEN 



BRIGHT 1;- FLH 



is: 



s=ii8 if .Locution then print n 

6320 "neIt a 

0 818 IF f-21 THEN GO TO 3868 
8635 i£I f=f *I . LET 9=1 i LET b-b 
-16 

o643 GO TO 8748 

6858 PRINT AT f.9;"i" 

oo;o GO TO 3828 
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X co-ordinate for testing player's new position during 
move player routine. 

TY and TX are also used for testing monster's new posi- 
tion during Monster Moving routine. 
Variable for returning the computer to GOSUBS. 
then return to GOSUB. 
then carry on. 
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Roy Cornell founded Cornell Software, a successful 
company specialising in Adventuring programs. 
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author of the highly acclaimed Volcanic Dungeon 
and Black Crystal. 




SUNSHINE 

ISBN0S4640.076 £5.95 het 



spectrum 
adventure 



% a guide to playing and wri 



| tony bridge &roycc 



£5.95 net 




